
SONS sur COMMODORE 64 

Vous avez toujours reve d'avor un synihe de recherche? C'es! fait... 
Le mode d'emploi est dans le programme. 

Christophe LEPECQ 



I .. . . 



Z*t32>=Z#<2) 
ZS(48>»Z*(3) 
Z*<64)»Z*<4) 
Z*<80>=Z#C5 i 
Z*C963°Z*(6) 
Z»<112>=Z*<7, 
Z*tl29>=Z*<8> 
Z*U44>*Z*<9) 
" Z*<160>=Z*<10) 
" Z*<176>=Z»<n) 
" ;Z*<1923«Z*<12) 
r, ;Z*<288>=Z*<13) 
" Z*<224>=Z*<14) 
Z*<24e>=Z*<15} 



279 ZSM4'= I 

299 Z*t33>«- DENTS DE SUE" 

309 Z*' 17j='TPIRNGLE 

318 Z*<65j>="PI 5ffi : dh 

328 Zt<l29>*"MUIT BLHHC " 

330 DIPTR(2.6:' DIf1F',26> DIflK'255' ■ F0RM-8TQ2 FORH= 

349 R<H,H)=0 HEXTN ■ R< P! -8> = 17 : NEXTM 

350 PRINT":?" 

360 POKE53230 - 11 P0KE53281 - 1 1 
379 PRINT"! 



410 
420 
430 

443 
459 



PRINT "SB 

PRINT " 13 — 
PRINT'S — 
PPINT"3 ! 
PRINT'S : 

ppiNT-a 

PRINT"3 1 
PRINT" ,3 ! 

frint":s : 

PPINT"iJ ! 
PR I NT "IS 
PR I NT " ; 



R E i 



E R C 



E D 



N 3 . 



479 
489 
498 
589 PR I NT "a 



BGHJOUR... CE LOGICIEL POSSEDE IS V 
LE3 FONCTIONS SUIVRNTES^ !1 r 

I" 

-INTERVENTION FRCILE ET RflPICE ST 

SUP LE3 DIFFERENT? PfiRflHETRES Hf 

DE CONTPOLE 30HQRE QU'OFFPE 3f 

LE COMMODORE 64. ;j I' 

I*' 

-EXECUTION BE3 SOHDRITES CREEES. a I" 



Suite page 3 



coucou 

NOUS REVOILOU! 




Et oui, c'esl encore nous! Nous 
sommes rentres de vacances. bien 
bronzes, bien reposes, tout frin- 
gants pour se remettre a essayer 
les trois containers de programmes 
qui nous attendaient devant la 
porte, qu'est ce que ca va etre dur! 
Ca n'a pas dur etre tres dur par 
contre pour les gens d'ATARI et de 
DRAGON qui ne se sont pas Irop 
casses la tete pendant les vacan- 
ces: pas de programmes interes- 
sants, ils restent sur la touche pour 
quatre semaines. Esperons que 
c'est seulement le retard habituel 
de nos chers PTT francais. Hector, 
rentre dans le special vacances, 
reste par contre parmi nous, les 
Hectoristes ont usine lout I'ete! 

Gerard CECCALDI 



SOS BUG 

Voire programme est plante? HEB- 
DOGICIEL a tait une boulette dans 
un programme? Appelez-nous le 
VENDREDI au 16 (1) 577 19 04 de 
10 H a IB heures. 



LES CONCOURS PERMANENTS : 

10 000 francs de pnx au meilleur programme CHAOUE MOIS. 
1 voyage en Californie pour le meilleur logiciel CHAQUE TRI- 
MESTRE (Reglement en page interieure) 



CANON X07 Le pnx du danger 

Francois BERNEZ Page 17 



FX 702P 

Christophe CHARLES 

COMMODORE 64 

Christophe LEPECO 

VIC 20 

Thierry PONSADA 



Mm. golt 
Page 6 



Protecteur 
Page 4 

Geographie 
Page 16 

Etude de fonctions 
Page 4 



HECTOR 
Michel 8AILLY 

HP41 

J.P.CHOLET 

ORIC 1 

Dominique MALLET page 5 

MZ 80 Yams 

Remy GERMAIN Page 18 

PC 1251 Fichier teiephonique 

Laurent FICHTER Page 14 



PC 1500 

Herve POMMIER 

ZX81 

Nicolas TRUB 



TRS80 

Claude GAUCEL 

Tl 99 4A(b.S.) 

P.G.RAVERDY 

TI99'4A(b.e.) 

Eric CASSINI 

TO 7 

Sylvam BOULAIRE 



Utilformes 
Page 9 

Spatio Jeep 

Page 15 

Demoniak 
Page 12 

Gestion familiale 



Page J3 

Sabre laser 
Page 6 

Space fighter 
Page 8 



DES PROGRAMMES POUR VOTRE ORDINATEUR : APPLE II ET HE 
CANON X-07 . CASIO FX 702-P . COMMODORE 64 ET VIC 20 . 
HECTOR HR . HEWLETT PACKARD HP 41 . ORIC 1 ET ATMOS . 
SHARP MZ, PC 1251, PC 1500 . SINCLAIR ZX 81 ET SPECTRUM. 
TANDY TRS 80 . TEXAS TI-99/4A . THOMSON T07. 



HIPPOREBUS trouvez i expression qu> se cache dans la 8 D de I hippocampe Decompose en trois syllabes dans les Irois premieres cases, le "tout" a evidemment un rapport avec I'-nlormatrque 
(solution en page interieure) 



UM SAINT; LCN\iENT(uNNEJ_,rtAiS P»A^>Tfc£S 

oATMOUQUE .. . 




AVEC C£S ABBRES ON MtTTRAlT LONPREi 
EN BOUT£IU£ . 



rv£ si&nifiE pas Ft)ftc£meAjT 5Uivee 

AC AVeUGCE.1T£ .. . 




— _ y / v 

-/ ,'/ J A 



OPERATION DC uADRAGE . 



I IN nrO 31 Aoot 1984 J 



Allemagne 3,50 DM - Belgique 55 Frs - Canada 2,50 $ - Luxembourg 57 Frs - Suisse 3 Frs - 




FIGURINES 



Ce programme est un programme d'aide a la program 

malion: il permet a I'utilisateur d'avoir de disponible, 24 deWemeni: control S. 

figurines (personnages. vaisseaux spatiaux, helicopte- robot^i^sov^uardian 

res...)- Ces figurines sont tres facilement insurables personnage 2(L1Q00): guardian 

dans un programme telles quelles ou alors tres simple- personnage 3 (1350): choplifter 

ment modifiees par I'utilisateur. 



Didier POGLIO 



L230 a 720: aller en sous-programme de dessin des diflerenles fi- OEH SPArTIAL (3250) MING'S CHALLENGE 

gurines. A axe des X (de a 279). B axe des Y (de a 189). BIDULE SPATIAL 1 (3420): de mon invention. 

L6210: sous- programme de choix de la figurine pour deplacer la BIDULE SPATIAL 2 (3650). 3 (3860). 4 (4110): SUPER INVADERS 

Heche de choix on appuie stir nimporte quelle louche saul RETURN BIDULE SPATIAL 5 (4290). MING'S CHALLENGE 

el pour chotsir la ligurine RETURN. Pour arreler le programme: ES- BIDULE SPATIAL 6 (4560). 7 (4770). S (4990) de mon invention. 

CAPE (1.5000). BIDULE SPATIAL 9 (5190): ELIMINATOR. 

Apres selection d'une ligurine. elle se redessine en noir sur fond BIDULE SPATIAL 10 (5380): de mon invention. 

blanc. Quand vous I'avez bien vue. appuyez sur une louche, repon- BIDULE SPATIAL 11 (5630): ELIMINATOR 

dre a la queslion par ou N. Pour arreter le listing en cours de CANON SPATIAL 1 (5850): de mon invention 

CANON SPATIAL 2 (6070): SUPER INVADERS. 

Toutes ces figurines ont ete refartes a partir de reditxxi des jeux sur 

ecran. les figurines sont reconstituees point pa/ point, du haul vers 

le bas. 

J'espere que tout le monde trouvera la ou les figurines qui tui 

conviennenL 

El maintenant lous a vos claviers pour detroner GOTLI8 ou pour 

enireprendre un grand voyage dans la contree fanlasoque des jeux 

informaliques... 



Lignes 140 a 180: DATA pour la produclion de sons. 
L. 210: effacement de lecran en noir (HGR). 



PERSONNAGE 4 (1560): SABOTAGE. 

PERSONNAGE 5 (1740): COSMONAUTE de mon invention. 

PERSONNAGE 6 (2000): DRACULA de mon invention. 

HELICOPTERE (2340): CHOPLIFTER (bien sur!) 

AVION (2630): PEGASUS. 

SOUCOUPE VOLANTE (2830): SUPER INVADERS. 

SOUCOUPE VOLANTE 2 (3020): ELIMINATOR. 



PPLE« 



ISO HOME :6 - 20 

14© FOR C - TO 138: READ D: 
768 • CD: NEXT C 

13© DATA 4,0.10,0.63.0.115.0.14 
3,0. 43.41,45,43. 224. 63. 63, 63 
,63. 191, 14, 101. 1,32,60,39,63 
,63,63,44,43.45.45.44,36.43. 
46,46,46,34 

160 DATA 43,33,33.33,53,62,35.6 
3,63,63.63. 63.63, 63. 39, 39, 39 
.44,37,45.45,6,0.36.37,43, lO 
,0, 100,32,232.31,62.54,39,39 
.39.232.34.22.174 

170 DATA 14.33.53,30,24,24,24,2 
4, 24, 32, 53, 61, 24. 24. S, B. 37. 3 
9,43, 72, 63. B, 40,37,44,34, 77, 
73,54,83,9,54.37,0.43,0,0,0, 



LBO 



DATA 173,48, 192, 136,208.4, 1 
98, 1,240.8,202.20B,246, 166.0 
,76.120.3,96 



190 HGR2 
2O0 8* - -NO- 
210 HCOLOR- 0: > 

30B2 
220 HC0LOR- 3 
230 B - 20 
240 A - 40 
250 GOSUB 760 
260 A «■ A «■ 40 
270 GOSUB lOOO 



290 GOSUB 1350 

zoo a - a * *o 

310 GOSUB 1360 
320 A - A * 40 
330 GOSUB 1740 
340 A - A * 40 
330 GOSUB 2000 
360 A - 40 
370 B - 60 
380 GOSUB 2340 



420 


GOSUB 2830 




A - A * 40 




GOSUB 3020 


430 


A - A » 40 


46© 


GOSUB 3250 




A - A * 40 


•81 ■ 


GOSUB 3420 


490 


A - 40:8 - 


S'.".' 


GOSUB 3630 


510 


A ■ fl • 40 


330 


GOSUB 3860 


330 


A - A * 40 




GOSUB 4110 




A - A * 40 


360 


GOSUB 4290 


■■./■- 


A * A * 40 




GOSUB 4530 








GOSUB 4770 


610 


B - 140:A = 


630 


GOSUB 4990 


630 


A - A * 40 


640 


GOSUB 3190 


69 1 


t, m A • 40 


66» 


GOSUB 3390 



730 


80SUB 6070 








GOTO 62 lO 








740 


END 








rso 


REM 








760 


REM PERSONNAGE 






770 


rem 








,■■■:■, 


HPLOT A - 


4.B - 


3 


ro a . 


790 


HPLOT A - 


«.B - 


4 


HPLOT 




4,8 - 4 








BOO 


HPLOT A - 
4.B - 3 


4.B - 




HPLOT 


810 


HPLOT A - 

- 3 


7,B - 


3 


TO A * 


820 


HPLOT A - 


B,8 - 


1 


TO A . 


830 


FOR E - O 


TO 2 






840 


HPLOT A - 

* E 


8.B * 


E 


TO A - 


830 


HPLOT A - 
* E 


4,8 * 


E 


TO A • 


860 


HPLOT A * 
• E 


6.B * 


E 


TO A * 


870 


NEXT E 








880 


FOR F - 3 


TO 3 






B90 


lii-l NT f. ■■ 


4.B * 


F 


TO A - 




900 HPLOT I 
* F 



2,B • I 



TO A 



920 



next i 



i * 6 TO A 



1330 IF M • ' 

1540 RETURN 

1 530 REM 

1340 REM PERSONNAGE 4 

1 370 REM. 

1580 HPLOT A,B - 2 

1390 HPLOT A - 1,8 - 1 ' 

B - 1 

1600 HPLOT A - 1,6 TD A 

1610 HPLOT A. 8 * 1 

1620 HPLOT A - 2,B * 2 

B * 2 

1630 HF 



l.B ■ 



3,B - 



1660 
1670 



1690 
1700 



TO A 

HPLOT A 
HPLOT A 



HPLOT A - 1 

HPLOT A - 1 
,B * S 

MPLOT A - 2 

',B * 6 

HPLOT A-2.B+7T0A- 

i ♦ 7 

HPLOT A * Z,B * 7 TO A * 

POKE 0,I3i POKE l,7i CALL 

IB 
IF B* - -Or- THEN LIST 1: 



1, 



HPLor i 

* 6 

930 HPLOT I 

940 HPLOT A * l.B - 4: HPLOT A - 

930 POKE O, 13: POKE 1.7: CALL SB 
8 

960 IF h% - "O*" (HEN LIST 760, 
94 O 

IK" THEN GE1 C% 

PERI 



17 



B» ■ 



"OK" 



HEN (iF_r I 



1720 RE f URN 

1730 REM 

1740 REM PERSONNAGE 3 

1730 REM 

1 76© B - B - II 

1770 HPLOT A,B - 1 

1780 MPLOT A - I, B TO A * 1,1 

1790 HPLOT A - 2.B * I 10 A 



970 


IF U» 


7B0 


RETURN 




REM 




REM 


1 •> 1 


REM 



ia-1'j 



HPi.OT a.m 
hploi a - : 

I * 3 

FOR J - 5 I 



2 ro * 



HPLOT A - 


l.B 


8 


♦ a 






HPLOT A - 


l.B 




* 9 






HPLOT A - 


3.B 


10 


B * 10 






HPLOT A - 


l.B 


lO 



NEKT J 

HPLOT A + 
,B * 18 

HPLOT A * 
.B * 19 

PQt-E O. 15 



1970 
1980 
1990 
2000 
20 K 



IF BS ' 

RETURN 
REM 

REM PERSONNAGE 6 

REM 

HPLOT A - fl,B - (>: 



THEN GET G* 



2020 

2030 HPLOT A 
B - 5 

2040 HPLOT A 
B - 4 

205O HPLOT A 



6: HPLOT 
5 TO A * 



2080 
2O90 
2100 



HPLOT A - 
HPLDT A - 
HPLOT A - 



1 



3,B TO A + 3,1 
3,8 TO A - 7,1 
6.B + 1 TO A ■ 



HPLOT A * 3.B ' 
B ♦ 2 

FOR L - - 1 TC 

■ 2,8 < 

■ 5.B • 



HPLOT I 



2190 HPLOT 



5,8 - 



2220 
2230 
2240 
2250 
2260 
2270 



2,B 



HPLOT A 
HPLOT A 
HPLOT A 
HPLOT A 
HCDLOR- 
PDKE O, 



POKE 1. 
I" THEN 
HEN 



2280 IF B* - "OK 

0,2260 

2290 IF 64 - "OK 

2300 RETURN 

23 lO REM 

2320 REM HELICOPTERE 

2330 REM 

2340 M • A:K - B 



'i CALL 8 
LIST 200 



lO.f 



2360 
2370 



2, 



2430 
2440 
24SO 
2460 
2470 



HPLOT M 

HPLOT M ■ 
,K * 2 

HPLDT M ■ 
S.K * 1 

HPLUT M ■ 

HPLOT M ■ 
I.K - I 

HPLOT M ■ 

K - 1 

HPLOT M < 
),K - 2 

HPLOT M < 

K - 2 

HPLOT M I 



2490 
2500 



HPLDT M I 

,K - 4 
HPLOT M • 

K - 4 
2310 HPLDT M - 

l.K - 4 
2320 HPLOT M i 

K - 3 
2530 HPLOT M 

8,K - 3 
2340 HPLOT M < 

2330 HPLOT M i 



2380 POKE O, 17i 
H(l 

2590 IF B» - •■( 

■ '. . ■■/•■ 

7fcOO IF n» - '( 

2610 Rl rURN 

2620 REM 

2630 RCH mm | 

2640 REM 

2630 MPLOT n 



K - 2 TO M ■ 

- 2 TO H - 

K - 3 TO M ' 

- 3 TO rl - 
K - 3 TO M ■ 
K - 4 TO M ' 



3 TO M - 
~ 3 TO M - 



POKE 1.3| 

i ■ HUN I 



2660 


HPLOT A 
,B - 3 


- lO.B - 3 TO A - ' 


2670 


HPLOT A 
B - 2 


- 9.B - 2 TO A - 8 


26BO 


HPLOT A 
B - 1 


- 9.B - 1 TO A . 6 


2690 


HPLOT A 


- 8,B TO A - 6,8 


2700 


HPLDT A 


- 4.B: HPLOT A - 2 




B: HPLOT 


A, 8 


2710 


HPLOT A 


* 2,B TO A * 4.B 


2720 


HPLOT A 


* 7,B TO A » B.B 


2730 


HPLOT A 
B * 1 


- B, B * 1 TO A - 6 


2740 


HPLOT A 


- 4,B ♦ Il HPLOT A 




2,8 * 1: 


HPLOT A.B * I 


27SO 


HPLOT A 
,B * 1 


* 2,B + 1 TO A * 1 


2760 


HPLOT A 
B ♦ 2 


- 6,8 * 2 TD A * 6 


2770 


KPLOT A 
2 


B-2T0A*3,B- 


2780 


POKE 0, 
88 


7: POKE 1,7: CALL 1 


2790 


IF M ■ 
0.2750 


-OK" THEN LIST 26 


2800 


IF B» - 


"OK" THEN GET J» 


2810 


RETURN 




2820 


REM 




2830 


REM SOUCOUPE VOLANTE 1 


3840 


REM 




2830 


HPLOT A 


- l.B - 4 TO A * 1 



2860 
2B70 

2880 



HPLOT A-3.B-3TOA* 
) - 3 

HPLOT A-4.B-2T0A* 
3 - 2 

HPLDT A - 8,8 - 1 TO ft ♦ 
i - 1 

HPLOT A - 6.B TO A - 4.B 



2960 
2970 



3020 
3030 

3040 



HPLOT A - 3,8 * I 
B * 2 

HPLOT A.B * 2 

HPLOT A * 3.B » I 
B * 2 

HPLDT A - 4.B + I 
4,8 * X 

POKE O. 17: POKE I 



RETURN 

REM 

REM SOUCOUPE VOLANTE 2 

REM 

HPLOT A - 4,8 - 4 TO A * 



303O HPLOT A - 4,B 

B * 4 
3060 HPLOT A - 4.B 

B - 3 
3070 HPLOT A ♦ 4.B 

B - 3 
3OB0 HPLOT A - 7,B 
,8-2 

HPLOT A + 7.B 
,B - 2 

HPLOT A - 10, 
3,B - 1 
MPLOT A ♦ 10. 



3090 



- 3 TO A ■ 

- 3 TO A • 

- 2 TO A ■ 

- 2 TO m 

- I TO A 

- I TO A 



IS 



IPLOT A ' 
3,8 ♦ I 

HPLOT A ■ 
,6 * 2 

HPLOT A - 

HPLOT A - 
B + 3 

B * 3 

HPLOT A ■ 
B ♦ 3 
POKE O, II 



210 IF 



■OK' 



1190 



3220 

3230 RETURN 

3240 REM 

3230 REM DEIL SPATIAL 

3260 REM 

3270 HPLOT A 



POKE l,7l CALL 
MEN LIST 302 
HEN GET L» 



32BO 

3290 

3300 

3310 
3320 
3330 



HPLOT A - 
1 - 2 

HPLOT A ■ 



HPLOT A - 6 

HPLOT A * 2 

HPLOT A - 6 
8 » t 

HPLOT A » 2 

n * i 

HPLOT A - 4 



JS70 poke i 



TO A - 2, B 
TO A t 6,B 
• 1 TO A - ; 



MI.N 



3380 IF 84 • 

0,3360 

33VO IF B* - "OK" tHI 

-^40O RETURN 

,41'J Rl M 

_'.4:'<i RIM BIDULE SPA 

34 30 REM 

3440 HPLOT A - 3,B - 



ATTENTION ! 

LES ERRATA SUR APPLE 

SONT EN PAGES6ET18. 



3460 


MPLOT 
8-3 












3470 


HPLOT 

B - 2 


A 


- 


3,B 


- 2 TO 


A • 3. 


3480 


HPLDT 


A 




6. B 






349© 


HPLOT 
8 - 1 


" 


" 


3. B 


- 1 TO 


A - 1. 


33O0 


HPLOT 
8 - 1 


A 


* 


1,8 


- 1 TO 


A • 3. 


3S10 


HPLOT 






6,8 






3320 


HPLOT 






6,8 






I8S30 


HPLOT 






3,8 


TO A - 


l.B 


3340 


HPLOT 






1.8 


10 A * 


3,B 


3350 


HPLOT 






6,B 






3360 


HPLOT 
B * 1 

HPLOT 


A 


" 


3,B 


* 1 TO 


A . 3. 


3570 


A 


_ 


l.B 


* 2 TO 


A • 1. 




B * 2 












3380 


HPLOT 
8*3 


A 


" 


3,8 


* 3 TO 


A * 3. 


3390 


HPLOT 


A 


- 


3,8 


« 4 IO 


A * 3. 


3600 


POKE 0.13 


POKE 1. 


CALL e 




88 












3610 


IF B« 


- 


- 


JK" THEN L 


ST 342 



3620 
3630 
3640 
3650 
3660 
3670 

3*80 

3690 



0,3390 

IF 8» ■ "OK" THEN 61 

RETURN 

REM 

REM BIDULE SPATIAL i 

REM 

HPLOT A - 3,B - 4 TO 



HPLOT i 
t - 3 
HPLOT i 



3.8 - 



i.B - I TO / 



3740 


HPLDT 

B ' i 


A 


■ 4 


H * 1 


.,-..< 


HPLOT 
l. • I 


A 


4 


l< * I 


3760 


HPLOI 
8 t 2 


A 


- 6 


b • * 


3770 


HPLOT 
B • 2 


A 


■ ' 


B • 3 


37BO 


HPLOI 
B * 2 


" 


4 


B » 2 


3790 


HPLOI 
B * 3 


A 


4 


H • <■ 


M.ri. . 


HPLOT 


A 


* 


n * 3 



38IO 
3820 



IP B» . 



"OK" 



MEN 



3630 IP B4 - "OK" THtN GET 0» 

3B40 RETURN 

3B50 REM 

3B60 REM DIDULE SPATIAL 3 

3870 REM 

3800 HPI.OT A - 3,8 - 6: HPLOT I 



3890 
3900 
3910 
39 20 
3930 
3940 
39SO 
3960 
3970 
390O 
3990 



HPLOT A - 3,8 - 
i - 7 

HPLOT A * 3,8 - 
1 - 7 

HPLOT A - 4,B 
) - 3 

HPLOT A - 3,8 - 

a - 4 

HPLOT A - 2, B ■ 
) - 4 

MPLOT A + 3, B ■ 
) - * 

MPLOT A - 6,8 ■ 
1 - 3 

MPLOT A - 6.8 ■ 
) - 1 

HPLOT A * 6,B - 
) - 1 

HPLOT A - 4,8 ■ 
1 - 2 

HPLOT A - 4,B ■ 
i - 1 

HPLOT A - ' 
I 

HPLOT A - ' 
I * 1 

HFLOt A « ' 
I < I 



7 TO ( 



t A » 6. 

) A - t>. 



,rn hpliit i 



MCOLOR- Oi H 

3 TO A • l.B 

040 HPLOT A.B - 

030 HCOLOR- 3 

060 POKE O, 131 P 

■a 

0/0 IF 84 - -OK" 
O. 40S0 
IF 8* - "OK" 
090 Rl I URN 
REM 

ni_M tlDULi 

Ml M 



130 



PI III i 



IS." MM HI 



- 3,8 - r ra 



-*■■ 



1,8 - ' 



n ! 

i< i 
in i (i 
8 


A 1 


SOito pitgo 16 



' 



RECHERCHE DE SONS 



Vous avez toujours rev6 d'avoir un synth6 de recher- 
che 9 C'est fait . 
Le mode d'emploi est dans le programme. 



Christophe LEPECQ 



Suite de la page i 



-RFFICHflOE DCS RDRESSES ET CES 
VfiLEURS HUMERIOUES fi UTILISER 
OWNS UN PROORfilfC. 



3i8 PRINT-a 

528 PRINT"» 

539 PR INT -a 

540 print -a 

556 PRINT'S 

5*e PRiMT-:a 

570 PR INT '■»__ _ 

590 PRINT 

590 PRlNT"« FPRPPEZ UNE TOUCHE POUR CONTimjER.. 

see OETfw iFH»--"TMEN60e 

610 PRINT *.T 
620 PRINT". 1 !. 



ERRATUM COM.64 

Dans le programme "Assem- 
bleuf'Desassembleur" pour CBM 
64 paru dans le numero 40. 
deux eneurs nous ont echap- 
pees: il fallait lire la ligne 230 
comme suit: 230 LG = 2: 
GOSUB 8500. et nous avons 
peremptoiremenl denomme 

'Jacques VERT le pauvre Jac- 

3ues VEROT qui n'en deman- 
ait pas tan:. 




/ p E c m £ R c I 



HE SONS. 



630 PR I NT "W 
6*0 PRINT'X - 

650 PRINT-a - r 

660 PPINT-a IVLES REGLftGES S'EFFECTUEHT SUR 3 VOIXa I" 
670 PPIWT-a SINPEPEUDfiNTES. CELLES-CI POUVRNT ETRE8 P 
660 t>PINT-a BECOUTEES SEP9REHENT Ou SIMULTRNErTENT/a r 

69e ppinT-a r 

700 PRINT-a r 

710 PRINT'S n LES CONTROLES OFFEPTS SOW" a r 

720 PRINT'S I- 

730 PPINT-an -4 TYRES DE MQTJULfiTION CET REGLRGE Ji" 

740 PPINT-an EvENTUEL DCS TRUX DE PULSATION tJWi a I' 
750 PRINT'S r 

760 PPINT-aD -ENVELOPRE DU SOW (RTTRQUE. CHUTE, a I" 

779 ppiNT-an soutien et PELftCHE>. sp 

7S0 PPINT-a r 

799 prints r 

890 PRINT'S *#CE PEGLAGE N'INTEPVIENT BIEN ENTENDua r 
310 PPINT-a k OUE SUP Lfi MODULATION DU MEW NOM. a r 

829 PPT>JT".« 

939 PRINT 

946 PPIHT'a FPhPP£2 ;JHE TOUCHE POUR CONTINUER. . . " 

950 C€TA* IFA*-""THEN859 

869 PPINT-^- 

379 PWE5329e. 1 1 POKE53281 . 1 1 

339 PRINT"*. 



1780 PPINT PPINT"« 

1790 PRINT"HJ VOIX I I I Z I 3 V 

1300 PPINT"a I I I P 

isie pRnrra wop.:: b: 54275 :s e 54233 a 1: 54239 

1820 PPINT"a 1 1 1 r 

1830 PPIHT-a BT.Hia « 54275 8 !! 54282 S 6! 54289 

1840 ppifiT-a BT.UH t: 54274 :: rc 5428i a e: 542*>; 

1856 ppint-s 1 1 1 r 

1363 PPINT"a W/C.a IT 54277 a ■: 54284 a C 54291 

1870 ppiNT-a ts/p.a r 542?? a 1; 54235 a n 542-32 

1830 PPIHT"a I I I P 

1830 PPINT"a - 

1900 PPINT";j TRPEZ JPETIJPH9 POUR PEVENIR RU MENU....' 
1910 PRINT- ,TH W »MM i MW -;TeB<12J.R(8.0) 
1320 PPINT PPINTTflB'I2'.P'0-n PPINTTP,B-:i2:';R':0.2> PPINT 
1939 PRIHTTRP'12>.P'9.3>*P<0,4> PRINTTRB<12> ;R(0.5>*R<9,6 



1940 PPINT"a»WM < a wW BOB";TSB' , £3?;P<l 

1959 PRINT PPINTTSE<-23^.P< 1.1 >:pPlNTTflB(23>;Pn. 2) PRINT 

1960 r^lNTTTO^j^.P'-l.SWRM .4>.PPINTTRB<23>.R<1.5>»R<1.6 

1980 PRINT PPINTTRB-:34):R':2.. lVPPIN?Tft8'34>;P<2. 2) PRINT 
1999 PPINTTfiE':34).R(2,3)+P':2.4> PPINTTflF' 34».P'2,5>*P'2-6 

2909 OETA* IFAt.=CHR*'13'THEN360 

2910 CiOTO2990 
2029 PPINT-rr 
2930 PPINT"* 



2929 F0RI«lT0LEHfKS> KrASC<NIW'(r«, I •>■>-! NEXT 

2839 FnpH=9T02 P0*E542?4*7»* R<H 

2849 P^?KE54275*7W1.P(«.]> 

2959 P0KE34277*?W1.R<H,3>**<I1,4) 

2969 P0KE54279*7«fi.P'M.5>*P'i . - i 

2970 MEXTM 

2888 H-9 POKE5429614 

2990 GETftt IFflf=--TMEN2090 

2990 FP=F<^'ASC<:ftf.''>V'OC T-H»7 IFFR»ZTHEM3179 

2910 OMCLC-0T02959 3029 3979 3120 

2920 PC*'ES*T.FP-HF»INT'FR.'MB< POKES*!*! .FP/HJ 

2938 P0**ES*T*4.P'H.9> FOPB»iTO20*<R«n.3->*R<n.4!> NEXT 

2949 POKES*T*4.R<:M.0>-] COTO2890 

£«5(j HF-RlM1BeiNT(FR>HB) LF-CP.'-HF 

^■i^n POKES ^HF ROJtES+t.LF 

2979 PCXES* 7 HF P0KES*9-LF 

2?90 Pd^ES*14 ■** PCVES*15-LF 

2990 POrES*4,P*0,0^ PCrES*H.e-l,9^ PCKES*19.R<2.«> 

3«W» F^F^lTnifl+flT NEXT 

3019 POKES+4,R<e,e>-I P»'E«+ll.P<1.0>-I P0rES»18.R<I.9>-l OOTOJ9?0 

3029 HF=FP-HF«IHT(F«f/HB-- LF=FP,--NE 
ar To?? er»-ES HF PO^ES-1-LF 

7O40 p.>ES+7 MF -P0KES+8-LF 
a r 59^0 POf'E3*4.P^0.0> POKES+ll.RCl.e) F0PT-1T01">*FK-1 »*\T 
3f 3060 ROKES*d p/0.0'.-! P0V'ES*11 -R'l 0>-l GOTO2090 

397H HF=FP-HF«INT'FP..-HE;-> LF.FR/WP 
jJ P jfvge F0«<ES+7,HF FO*:ES*?-LF 
:! r 3090 F0K£S*14.HF P0K"ES*15.LF 

3180 POKES*ll.R-:i.e> POKES*18R<2.0) F0PB-lT015*flC2 NEXT 

3119 R0KES+lt.R<1.9''-l-Pl>:ES*i8.P<:2.e)-i noT028^6 

3120 MF*FF-HF»IHT'FP-'HF> LF-FR/HB 

3130 POVES.HF Pi>:E3*1.LF 

3140 P0KES-14.HF P0KES*15-LF 

3150 POKES*4.P(8.0) POKES*lS.Pf2-0-. F0PF-1T015+9C^ NEXT 

3169 P0K-E?'4.R' 0.8>-i POK'ES*18.Pr2.0>-l 00T02S99 

2J.2LJ F J?*"' ,, * T>€NM " 8 C 1 -" 9 P0KE1581.81 P0KE1621.32 FW.E1661.32 



-S-THENM-1 CL»0 P0KE1581.32 R0KE1621.81 P0KE1661.32 



/ P E C I 



EJCHE 



e son: 



890 PRINT "3* s 

yxB> PP(i(T-S| 

910 PPINT 

920 PRINT 

930 PPINT 

?49 pviNT -a — 

959 PRIMT-a 3~ 
-"■■ PRINT a 
?79 PRINT-a 
980 PPINT-a 

990 ppjMT-a a_ 



p e « 



I E P i 



IE DE SONS/ 



■ MENU INITIAL ■ 



> PRINT-a * 

1919 PPINT-a 3 

1020 PRINT"* SB EXECUTION 



1959 FPiNT-a a_ 



1090 PPINT-a 3R RF-FKHfiGE PES DOMNEES ft ' 
1990 PPINT-3 

:■■"-' =■=■■. r";j 



1119 OETft« IF«t--"TM6N1119 

1120 IFR«»"P-TMENH90 
1130 IFM--B-THEN1690 
1149 IFR»--E-THEN2390 

1159 IFfW--S-THENB«--n 

1169 IF9f-"C"THENB*- , '3 

1179 GOTO1I10 

1189 PPENT"^" 



2949 PPlNT"Sa 

2950 PR I NT" 3 

2n>;0 PPINT 

2370 PPINT 
2090 PPINT 

2999 PPINT"a 

2100 PPINT-a -,B»: PRINT-a r 

2119 PPINT-a 

2129 PRINT-a 

2130 F0RV-I1TO21 

2140 P0KE55296*49«V. 12-POme24*40«Y. 101 
2150 PWE55334+49»V.12:pC*-E1062*40<*Y.183 
2160 MEXTV ^^^^^^ 

2189 pt>iM"wmmmmmmm confiptiez-v'Cjs 

L'OPERRTION •> (0/N)- 

2199 GETO* IFOf-"-TMEN2190 

2200 IFO*-*N-TMEK860 
2219 PRINT"K 

2229 INPUT-WPMOM DU FICHIER *;Nf 

2239 IFflt-'C-THENC0SUB2329 

2240 IFR*--S'TMENG09UB22«9 
2250 FORT-lTO3000:NEXTPETiJPN 
2260 PPIHT"*r 0PEN1.1,1,N« 
2270 FOR«'0TO2 : FOPN-9T06 
2289 PRINTtI,R(P1.N)iCHR«<13>. 
2299 NEXTH MEXTM 

2390 CLOSE 1 : PPINT -r»eCR I Ti.iRE TERMINEE..." 
2319 PETUPN 

2329 PRINT"»-:0PEN1.1.9.N« 

2330 FOPM-0TO2-FORN-0TO6 



/ 



GOTO2890 

3180 IFftt 

G0T0239C 

3199 IFM--SrTHENn-2 CL«0 P0KE1581.32 POKE1621.32 POKE 1661. 81 

. 0.-. 93% 
3209 lFR«--k-TNENCL-2 P0KE1581.81 POKE1621 .81F0KE1661 .32 00T02899 
3219 IFM"'WTHENa."4:PC*EJ561.81 POKE1621 -32 POTE1661 81 WTO2890 
3229 IF9S--1TTHENCL-3 POKE 1591. 32 P0KE1621 .81 P0KE166! .91 G0T02899 
3239 IF8f»-XTMENCL-l P0KE15S1.S1 POKE1621.31 P0»'E1<61 31 OOTnje^fl 

3249 IFR«-CHR*( 13JTKNP0KE54296.9 OCT 0060 

3250 IFft*--«-THEN0C-8 0«--«l 1 ■ -005083340 00102998 

3269 IF9*--rTHEN0C-4 Of-"« * 2 * -GOSUB3340 OOTO28«0 

3270 IFft»--iTT>*N0C-2 0I-"» 9 3 • - OOSUB3340 C-?TO29«0 
3289 IFR*--ITTHEN0C-1 0*-"« 31 4 W OOSUB3340 00T02899 

3299 IFR»--»"TMENO*- 

3399 IFftt-"*-TMENO«- 
0OSUS3368 

3310 IFR*--» 1 THENbt' 
C-OSUB3580 

3329 IFR*--«-TMEN00SUF3928 

3330 GOT02899 

r 3349 rv-iHTmaammmm—m 

3359 RETURN 



BOUCLE 3 »■ FORO-1TO2I0 RERDI NEXTO 



;TRB(24>0» 



??6? POSUF3340 

3370 PERDH IFH-- 1TMENREST0RE GOTO3560 

3380 PEftDL 

3399 ONCLOOTO3430. 3470, 3590. 3539 

34«> P0KE54273*7tM.H P0KE54272.7W1.L POKE54276*7»M.R(M.0> 

3418 FORT-1TO40 NEXT POKE5427<W«M,P<M.0>-1 

3429 G0TO3379 



1 POKE?4283.R(1,0) POKE54290.R<2.9 



POK-E54283,R(l,0> 



RE C H E R I. 



1219 PRINT-W 

1229 PRINT-SF 

1239 PRINT 

12*8 ppwa^ 

1259 PPINT-a lf/H»/OIX !7ll 
1268 PPINT"! 
1279 PPINT 



m*HinpijLi=(TION 



2349 INPUTti,P^M,M) 
2359 NEXTN NEXTM 

2369 CL0SE1 PRINT"ltiM.ECTURE TERMINEE...' 

2370 RETURN 

2380 S- I 3»4996* 1 024 MB-256 2-8 CL-9 i OC-4 

2390 PPINT-rr 

2499 F0RI-9T029 P0KES»I,9 NEXT 

2419 PRINT-a™ 



3440 P0KE54276.R 

NEXT 

3450 POKE34276,R(0,9> 

3460 OOTO3370 

3479 POKE54273.N POKE54280.H POKE54272- L ' P0KE54279.L 

?4P0 Pr«E54276.R< _ 0.0VPo*'E54283,RM.9VFORT-tTn40HEXT 

3490 POKE54276.P'0.0>-1 P0KE54283. R' 1 . 0)-l ; 00T03379 

3500 P0>E34289.H P0KE54287.HP0KE54279.L P0KE34286.L 

3319 P0KE54283.R<1,8) POKE54290.R'20i F0PT-1T049 NEXT 

7529 P0KE34283.P'1.91-1 POKE54299.Rf2.0>-l P3OTO3370 

3530 P0KE34273.H PPKE54287.H P0KE5427J.L P0KE34296.L 

3540 POKE54276.R(9,8> POKE542?9.R(2,0> F0RT-H049 NEXT 

3339 POKE54276.R<0.8)-1 POKE54?90.P(2.0i-l n0Tn7'»7e 

3560 0*--« a 2 S " nr<4 0O?i.iP3''4R 

3579 PETijPN 

3399 OOSUB3340 



FORT-IT039 
1 POKE34290.P'2,B)-| 



' R E C HERCl 



D E SON! 



12 



i ppiNT-a— 



m 



1299 PR[HT-a 

1399 ppint^i tf^rrfiux de puu 

1319 PPIHT"a ll_*l!TflijX DE PULS. LOa 

1329 PRINT-a 

1330 PRINT 

1340 PRINT-a 

1358 PPINT-a If 

1369 PPINT"a IR*WTTWJEa 

1370 PPINT"a MCHCWJTEa 
1390 PPINT-a IBMIsOUTtEMM 
1390 PPINT-a IPHFELRCHE 

1499 PPJNT-a^ p 

1419 PPINT PRINT":: T9PEZ »ETUPH« PGUP PEVENIP ftU MENU. 

1429 M-9 OOSUB1540 

1439 OETPf 

1449 IFH«--VTHENMf1*l 0OSlJB134e 

1450 IF8t--»1-THENR'«,0)-R'M,0y»2-l GOSUB 1 630 
1469 IF«f»-M"THENN-l PX-rOOSU8I669 PPINT" 
1479 :Fftf--L"THENN-2 PJi»I6 0OSUB1668 PRINT" 
1489 IFRt--R"THENN-3 P2-16 GOSUB1660 PRINT-B 



:: 



2449 PRINT PRINT PPINTPPINT 

2459 PRINT"»JM INSTRNT SVP. J'RNRLVSE VOS PEGLROES.." 

2469 Pl-7949 F0PI-1TO26 F'27-p-FI«3.8*38 F1-F1/2TU/12 

2478 R1-P(9.3>*P'0.4) R2-R< 1 . 3)*R(1 .4) R3»R<2.3)*R<2.4) 

2489 IFftl>R2THEMRCl*RrOOTO2509 

2499 RC1-R2- IFR2>R3THENfiC«R2 

2599 IFR2>93THENRC2-R2 GOT02328 

2318 8C2-R3 IFR3>filTMENRC-R3 

2528 IFR3>RITHENRC3-R3 OOTO2340 

2530 RC3-R1 IFfll>R2THENflC-flI OOTO2550 

2340 IFRI-R2RNPfl2-R3TMENfiC*nj 

2538 PRINT-T 

PRINT-TTT' 



opw 



^ooo 



,v\e^ 



TR8<21>.Z«<R<n.l>) 
TRB(2n;2»(P(M,2)) 

■»»r,TRB<21).Z*<R<r 



1*99 :FRf--C"THENN-4 PX«1 0OSUB1669 PRINT"! 



Br,TRB(21 J.Z*<R<M.- 



'S-THEHN-5 PZ-16 O0SIJB1669 PPINT-1 
P-THENN-6 PX-l OOSUB1660 PRINT-* 



1590 IFR»- 

5>) 

1518 IFRJ- 

6>> 

1528 IFR«»CHR«M3'THEH969 

1539 00T01439 

1549 IFM-3THENM-9 

1539 P0VE55344,7 P0VEI272,49»M 00SUB1639 

1369 PPINT"IMinMaaMW-.rRBi'21>.Zt<R''M>l>> 

1379 PPINTTflB'2I -.Z«'P'M.2>> 

1389 PPIMT-BWr .TRBf2lJ.Z«fR'n,3>) 

1399 PPINTTRB''21>,Z* I 'P<M,4>> 

1689 PPINTTRB'21).Zf'P':M,5>> 
1619 PPINTTRB'2I>,Z» | :R'M.6)> 
1628 PETURH 

1639 IFP'M,8)>129THEIW««,8>"17 

1^40 ppiNT-a»«miiiw-.TRB'25'.z»<Rrn,0>) 

1639 PETIJPN 

1669 R'M.N>»P'M.Ni»P'/i 

1679 IFP'K.H^n^PJITMEHRrM.hD-e 

1688 PETI>RN 

1690 PPINT-T 

1708 """ T "^i i 

1718 RPINT"M /RECHERCHE DE SOI 

1728 PPINT"*! 



1759 PRINT'S B**F!CH90E E»ES RDRESSES ET DES VRLEUPSa P 
irm P»IMT-a» 'ROrEP> D0NS tJN RR00RRW1Ca P 

1770 — '"T-T 



IT;TRB(2n.Zt(R(M. 
•r,TfiB(21).Z«(R(M. 



ERRATUM sur CBM 64 
MANOIR du N' SPECIAL 

AOUT. 

Pauvres CBM'istes. qui n'avez 
pu taper le programme "MA- 
NOIR" du numero special! Tcop 
de caracteres ont paute sur une 
ligne dans le mode d'emploi. II 
fallait lire: 

"POKE 44.64: POKE 64* 256,0: 
NEW. 



2360 PRINT-a P 

2579 PPINT-a IM BOUCLES PPOOPRMMEES »'F2,F4.F6.Fe) »P 
2589 PPINT"a WW EXECUTION DtRECTE SUR LE CLAVIER: a P 

2599 PR I NT -a P 

2699 PRINT 

2610 PRINT-M 1 13 P 



F3.F3-F7 Klfl BOCTRVE 



"1MNM 



HUH 
HUM 



It .1 
11 M 
»l II 



M 'I ■ 
M M ' 



2649 PPINT-II 
2639 PRINT"*! 

2669 PRINT"* Fl 

2670 PRINT-H 

2688 PRINTTftB'14? 
2699 PRINTTRB'14> 

2709 PPINTT8B'14i 

2710 PRINTT«B']4> 
2729 PRIMTTftB<14>,-B»IMIE1RIT I' 
2739 PRINT-WTTIITRPEZ ■tffTURHV 
2748 PRINT-POUR PEVENIR" 
2750 PRINT-8U MENU ....• 

2769 PPlNT"«O*B««»«»««0«»r.Tft|lf23).Z*<P'0.0>i 

2770 PRINTTRB(23'.Zt<RM.9>) PRIMTTRBC23);Zt(R<2.e)) 
2780 0»--« I2t - OOSUB3340 

2799 FQRV-13T015 POKE55333*404)V . 4 NCXT 



MUM IOIP1tl»1 



3590 IFCL"lOPCL-2OPCL-?npCL-4TMENn-0 PQVE1381.81 POKE1621.32 P0KE1661..12 

1688 FOPNM-0TO2 POKE54275*7«MM.R(M,l)'P0KE54274*7»MM,R<r1.2) 

3610 P0KE34277*7»MM.R<M,3)*R'M.4'. :P0KE34279*7«MM.P<M,3»*P(H.6> NEXTHT1 

3629 PERDH1 IFH1»-ITHEHPEST0PF 0OTn3699 

3638 PERDL1 RERDH2 REflrL2 PE8DH3 PERDL? 

3640 P0KE34273.H] P0KE34272-L1 P0/E342S8.H2 P0KE34279,L2 P0KE34287.M3 

3619 P0KE34296.L3 POfE54276.R'M.0> P0KE34283.P(M,8> POKE34290.RCM.8) 

3660 FORT- 1T0499: NEXT 

3679 POKE34276:P<M.0>-rFOKE54293.P'M.0>-l P0KE34299.R(M.8)-1 

■7PRB nOT03629 

"16W F0PMM-«Tn2 P0KE54273*7»Mn.P'Mn.I)-P0KE34274 + 7«MM.Pi'Mn.2> 

3799 P0»fE54277*7»MM,P'MM.3>*P'M11:4-. P0KE54278»7«W.RfriM.5)*R<l1M.6' NEXTMH 

3710 01--» 3 2 1 " 0C"4 GOSUB3340 

3729 ONCLO0SUP3749. 3768 3780.3809 

3730 RETURN 

3749 P0VE158L81 'R0XE1621 .91 P0KE1661-81 

3750 RETURN 

3760 P0KE158I.81 R0KE1621.91 R0KE166L32 
3778 RETiJPM 

3788 P0KE158132 POKE1621 81 P0KE1661.81 
i^- 3798 RETURN 

3900 P0KE13R1.91 POKE 162 1.12 P0fEI661.fll 

3919 PET'JPN 

3928 Ul-P<8.8) H2-P(1.0* 1<9-P'2 « • 

1839 Ot--nsi BOUCLE 4 ■" 00SUB334B 

3840 P0KE159191 F0KE1^21 32 POKE1661-32 

3«50 P0KE54273.2 P0KE54272. 104 P0KE54276 HI 

jB^O FnPT-ITO390 NEXT POKE54276.M1-1 

1879 P0KE54273-3 P0KE34272.54 P0KE34276.H1 

189B F0PT-1TO399 NEXT P0KE34276 HI -1 

3899 P0KE54273.2 P0KE54272-228 P0KE54276.H1 

■Y*>c F0PT-1T0298 NEXT P0KE54276.W1-1 

n»i0 P0XE34773-? Pr>-E54272.104 P0KE54276H1 

3"»?d FORT-lTntft0 NEXT pnfF 54?7S ul - 1 

T»i0 P0VE54273.3 P0KE34"2.54 P0KE34276.W1 

-M49 FORT-1T03»0 NEXT P0rF^4?76,Ml -1 

1^38 P0vE^427i.2 P0WT542T2-We rr*r*-t :■:■■ ■ HI 

-t-vfi Ff)PT-lTn?0O NEXT POE34276.H1-1 

-)«70 P(Wf.427?.? pnKF54272.104 P0KE34276.H1 

1OB0 FOPT-lTn^WHFXT P1>E34,''76 Ml - I 

7409 PC*E54?7'< 3 R0KES4373.94 P0KE34276.M1 

4«0O FnpT-ITO1«0 "EXT pr*FT4276.Ml-l 

491« pr¥F^427'' 2 P0KF5427? 2?0 Pf>E54?V Hi 

4070 FnpT-lTO?«« »*XT P0XE34276.UI-1 

4030 P0KF54273 2 ROM-34272. 184 R0I-'E5427*,M1 




PROTECTEUR 



D6truisez les vaisseaux qui survolent la base d'Altair 
avant qu'ils ne contaminant latmosphere et ne la ren- 
dent radio-active! 

Thierry PON SAD A 

Protecteur contient una routine de langage machine, un mode haute 

resolution «1 un mode mutttcouleur 

II eel precede dun court programme servant a deplacer les zones 

basic Ca programme doit etre charge avant de taper le programme 

et avant de >e 'aire toumer 

7 Mm7?.n. ?9. 9B.ee »i 55.94.93.e3.s6.8i.9e-1 

4 ClN«*REBEFINITION« 

le 5f»T«o e.e iM.ao . 

15 DRT* ■' .1 20.72 

20 DftTI*».63. 31. 15.6-9 0.0. 2S9. 233. 231 61 .30 .7.9.9 

^5 i*»T«i5* . ;?•» 234 iee>t24.24e. w- a m -■■ ue. 32-0-9.0-9 

» DftT-.> . . 9,0,0... B IS. B. 4.1 

35 W»T« .■ ! 9-9 

49 DRTAO ■ 1. e.8 233 9.0.0.255 
45 I«T«9.0.255.e.i55.0.;5? 8.233 233.0 233 .293.233.0.299 

50 WT^55.255 233 0.233 233 233 253. 170 170 I '0 1 '0. 179. 179. 149.63 
55 DftTfil7e.17e.179 170. 179. 169.85 a* : 

69 DftTfll7917e.i79.176.85S3.85 -S3. 170- 1 70. 1 70,83.03.63. 83. 8"> 

65 DftTm79. 179. 149. 85- 85- 63- 65. 85- 170. 179. 83. 85. 83. 85. 85- 83 

79 DATA! 79-63- 93.65 33 35 55,85.85.35.85.85. 65- 83- 65. 65 

75 DOTfll79 170 ?9. 83- 83 83. S3. 85. 179 179. 170. 170, 170.106.83.85 

99 DflTfllTO 179.179.170. 179- 179-86- 83. 8. 8- 8. 2. 64. 8. 16.0 
85 MTfl 0.9-128-224.240 248-60. 188. 124. 254. 234. 234. 259. 254. 252. 252 
00 DfiTft252 -246 66.48 192 0.0.8 t< SB 223.127,95.255.127.126 
95 DftTfll27.63 63 63-o? 9593127 127.252.121.127-255-63.9.0 

100 DftTft9-4 16 2.0 0- lo2 8.0.32.67.40.64.21.42 
195 WTA0.32 16 32 664.3.^4.4.9. 16. 0.9. 8- 32. 16 

119 DftTft40. 10.66- 149.2- I 9.0.9- 16 32. 16.40. 16.0.0 

120 DftTfW 0.16.1.9.64.2-0.0.32-2.64.0.0.16.0 

••■-* 

; --. icr-,»«,,,.»,. .-. * 

140 1WTA169.0. 169 32 160.0. 153 110- 30- 153. 132. 30. 200- 192-4 
145 D«Tft208.245 169.63. 160. 21. 24. 153* 110.30' 105.4. 133. 132.38 
150 DflT«56.233. , 5 I 27.160.21.169.7 

•.32.150.136.208.247,96 
170 DATA 162 172-30.27 192-0- 208. 3-76.0.26. 185, 1 10. 30. 136. 153- 1 19. -30.200 
180 DflTA135,132.30.l36153 132 . 30- 163.5. 153. 113. 130. 133. 132. 150.200.280,232,224, 

190 DflTA208,226. 136 136 169- 7- 153- 1 18. 130. 153, 132, 159-209- 169- 32- 153. 119.39- 153, 

132 

200 DATR30 136- 136.136. 136.140.88.27.96 

306 r*j-36874 D6-36363 R Q« 7630 CO- 304 00 W>«9 V-9 

■^ poinT-raor .■■ i r 

513 PRINT' 1 PROTECTEUR r 
515 PRINT- ! T 

529 PR:NT"BWi!«STBUCTI0NS<O/'N'- 

530 POK£HU*4.06 PCEW5 27 „ , _,„ 
340 F.3PO-123T01745TEP2 P0KEI€*2.0 FOP»9TO109 WEXTX POKEWJ*! ,0*40 HE/.T0 
559 POKEHLf+l.O 

HEM PCE^-H-3.11 GOTO600 
' T F9RI.,2>?TO150 P0K£DE*1,I POKEMU. I FQPfi«9T039 NE'/TFi NEXT] 
561 ORINT-T. PC*EW>»5.:t POVENU9 

-.T-iaOWS COeifiNDEZ LA BA?£- RRINT"DE MISSILES D'ALTfllR 4" 

i - OU»fr. PRINT' LA PLfttl 

566 PRINT "EN FFFET OUAND 3 * PRINT "VAISSEAUX PftSSENT A LA SUITE " 

see -■ ' ' - -athosphepe devieht- ppikt-m a radio-active 

- aKPEU A PEU tout est- 

574 print**** ume touche 

576 «Tfn ;=-!= THEHS76 

--■'.- T-- ::i;S 0XTP1XE2 LE 
539 PRINT"B —OB :•--: ' 

iJLE PART" PPIHT-D'lJN COTE. ON rC PEUT" PRir.T"PL>JS PECTIFIcP 




PPINT"COHTAHIr€i ' ' * 
■ PRIMT-MISSILE RVEC* OFl-FEU" 



PRINT I* E">r SfluVEE" 

print* aeaM TflPEZ UN( TOUCHE 

OETAI IFftl 

;..- WI-PARIK' PPIMT-*M10-LEMT- 
IMPUTH lFM-:nHEN603 
PRiNT"«ffflPE2 UNf rOUOC E' 
r,ETAt IFflt- "THEN*. 2 
PRINT'lT FORI-9T02I POfEPO'332* 1 . 71 pr>-EFn*3.*4*I 72 K*EPO*l»J»6,73 

. 1 it- 73 ;ni E* r ." 1+4*2.7* P0KEP0*4I9»I.74 ME/CTI 
P0RI"0T013I P0KECO»332*r.»j MEXT1 
FORI«0TO2I F", F' m..i,.|.[ m i«.Tl 

:...-.... 134, A I 

POKEKM-39. 93 Ptr6P0*49 - 6PO*W,9 



- : JSEfll - Lit PLFWETE ■ 



£30 POJ M-09 

669 POKEP0'79. 192 PfJfEP0*54 . 193 

^'70 F0RI-OT066 P0KECO*33*I.7 he.ti 

660 FOPI'*: ■ P0KE4096*i -PEEi ■ 

f,~^ pnpi=i-iTM.= i READfl F-OI E4576.J .« NEXT! 

- EI«*4,2S2 PCiKE7ft00.9 
790 P0KE36879 10 

710 F0RI"eT033 REfiW P0KE6656+1 « HE ri FORI«OTO€0 FEHDA PC* 1 E 3090* I , A rCZTI 
640 P0KEtf>3.ie F0RI-128T022e'P0KEMU I P0KEJ1U+I I -00 NEXT I 
003 F0KEW.9 PC*EM*.'-1 .'3 50*9 M*0 D-0 Nl-IMT'll. 
-:lfi -:=JHI- Villi' 1 ••k\ "\ P»P0*:'9S:+y r - -'■■• ■■'■• 
829 POKEPX.70 P0KECX.2 
030 B»iMT<nflKt>iMl)+l tF8-lTHEM3V830eO-NP"HP*l 0-0 

■ ' : »:.32 

640 tFF€EK<197)032THENGI 

350 PX«PX*D CX-C<*D IFDe-22THE'i: 

a--;© [FP/:;-pn.;';vjPF:.>Fri*:-fl:iOf-i>,: :FOM:orHFt.r,.jTO300 

27a IFPEE* 'P ' :-i F-i.:iPEEf'PX.067IWDP€EK<F -: ■■- 6:thEih-/jSUB6000 

rHENOO9Ue7O0e 
3?0 IFNP*30THENCO1 

?90 B=IHT'PMD'[ ••'II .-1 |FB-fTHENSV83000 liP=t(P*l 0«9 
?65 [FHP^eTH£NOO3UB7O00 
319 IFMP-38THF.HOOSUB1000 
929 00T0620 

]?'>? PEri »M7EPTi-:.EriEnT* 
1095 NP*t#**l 

1910 F0PI-9T05 PPINT"«J ALEPTE" P0KEI1U.249 

1015 FORt^OTOeO NEXTU 

1929 PPIMT-e) " FOF/=9TO20O NEXTX ■ POKEMU , 9 riE/.TI 

1039 RETURN 

493" PEM«»**TOUCHE;. RFPuVEE"**** 
5090 IFH=1THEN30 

5005 iFPEEK<197>*49THE«3O-2e0 D=IH-I 
-lOlO IFPEEK<197>MeTHEH80"133 D—I H»l 
3029 IFPEEK<197>*39THBH80*230 0—22 H*l 
3930 RETURN 

^ 5? ; ; ^ Er ,*», ,♦»,#**♦*♦*»♦ 
5339 PEM**«EXPL0SI0tl**4 

69«9 POr-EPX.189 POKEPX+1,191 POKEPX-1.99 PC+EPX-22.37 
6093 POKEPX-23,36 POKERX-21 -36 POKEWJ. 
6910 F0PI=9T04 -R0KECX-2+I. 15 ■ P0fECX-24+I . 15 JiEXTI 

6029 FOPI-133T01603TEP2 FO^EMU+3- I 
6930 POKEMU*?.!^ F0P>'=9TCi59 NEXTX 

6640 P0KEMU*5 .19 F0RK4T050 NEXTX NEXT I 

6050 P0KEfiU*3.0 Pr^EMU*4,3 

6960 HP=0 PT»PT*1 ■ JFPT=19THEH800e 

6079 POV-E7090.0 

6930 FORI=0TO300-HEXTI FORl-eTOSS P0fEPU*68*I -32 NE/ri 

6030 PETiJPH 

6939 PEt1*4*C0iJt.EUP flTHO^PHEPE*** 

7090 IFV320THEH7590 

7910 P0KEC0*4S4>V. 13-POCEC 0*435*7. 13 P0f£C0*456*V. 13 P0KEC9*487*V. 13 ',"'/*4 

7015 P0fEMU.9 

7020 FOPi=2O0TOi79^TEP-l P0kEIH.i*2, I FOPP*0Trt49 tCXTP l€/TI 

7039 POKEMU+2.0-PETUPH 

7,'vs? PE-t««*»"!i?.-.ir>J» i 'ON*s-i'i;OMfLlE»*** 

7500 P0K6HU+3.9 POKEMU+4.13 P0KEC0*304.13 POKECO+505- 13 

7519 F0RJ"220T01278TEP-| POKEHU.J PWEmj*! , J 

7520 FOPM*07O20 "EXTM HEXT .! -POKEHU. 9 POvEMU*! . 
7530 PRINT"^", POKE36S63.240 

7540 PPIHT-ieom TOUS LES HABITANTS " 

7550 PPIUT"» 30NT MOPTS" 

7-i69 PRINT"W»/OiJS H'HVEZ DETRU1T" 

7570 PRINT" 0».lE P, -PT. "VfiI3'=Fftl I.' ::■,'■ 

7530 END 

Spg? REHCeiHISSION REU88IE*M 

6910 P0i'EWJ*3.12 

:ffl2n F0RI"8T08O-P0(.'EDE.I Pui'Efuj. 1+130 

FORI .-.--JCZ-.-' ".£ ;TK "F-Ti FiV ^-PF ■:■ 
P5,7:c. pi-j"EMiJ,0 PPIHT'TJ- POK E36669, 249 
6945 PBINT'Ba»1ISSI0N ftCCOMFLlE' 1 
9.w< FPiiiT"ff;oi^. ftvEZ riETFi..iT 10 rflisSEflOX 
g065 PRlHT")aaiT" ':-■'■ "fF-PTIE"- I'F PU1NETE" 
8070 PRINT "SOHT [NTACTES* 



ERRATUM VIC 20 

Dans le programme A/F publie 
dans le numero 40, nous avons 
omis de preciser que ce pro- 
gramme necessitait une exten- 
sion I6K0. Dont acte. 



ETUDES DE FONCTION 



Le but de ce programme est d'etudier les fonctions a 
une inconnue (f(x) = y) il permet le calcul x fixe de 
f(x), r{x), r"(x), une racine au voisinage de xo, les ex- 
tremums. les points d'inflexions. les asymptotes en I'in- 
fini. 

J.P.CHOLET 

1 -. Entrer le programme, puis GTO. 

2 -. Programmer la tofldion a etudier en commencant par la nom- 
mer {01 LBLI) il ne faul pas utilise, les registres 00 a 09 x sera dans 
le registre X au debut t(x) devra etre dans le meme registre a la fin 
du programme qui se terminera par TRN ou END. 

3 -. XEQ1FT entrer le nom de la tonctwn. 

4 — Si I'on desire calculer les derives Nieme n R/S. x R/S. 

& Ton desire la racine ffx) = au voisinage de xO XEO tRAC. xo 

R.S (( doit etre defmie a drone et a gauche de xO). 

Si I'on desire iextremium au voisinage de xl. XEQ tEXTn xl R/S. 

Pour le point d'inttexion. XEQ tINF. x2 R/S. 

Pour les asymptotes XEOt AS* en * 00. XEOt AS en - 00 

Pour une integrale XEOt INTO, n R/S (nombre d integrales calcu- 

les). 

NB: Pour calculer ffx) on peut utiliser la methode suivante en mode 

USER, x Enter. XEO E. f{x) sera afflcbe dans le registre X. 



9. M 83. U 

8I.LBL "FT- 

62 CF 96 

6? -FONCTION HON?' 

M AON 

95 f9W 

96 ftSTO 86 
67 MFF 
98.L81 66 

89 -BERIVE'l-3- 
18 PSOIPT 

11 STO 87 

12 ■*=■>■ 

13 P*0WT 
11 STO 81 
15.LBL 84 



16 &CL 81 

17 8.81 
13 * 

19 XEO IH1 89 
29 STO 92 

21 RCL 91 

22 8,82 

23 ♦ 

24 XEO IND 68 

25 STO 83 

26 RCL 81 

27 8.61 

28 - 

29 XEO IHD 86 
38 SIO 94 

31 RCl 91 



32 8.82 

33 - 

34 XEO IND 86 

35 STO 85 
K RCL 81 

37 XEO 1MB 88 

36 STO 86 
39 FS' 68 
49 PTH 

41 GTO IHD 87 
42.L6L 81 

43 FIX 8 

44 W 

45 DKCL 81 

46 •!->=• 

47 FIX 4 



48 RCL 82 

49 8 

58 • 

51 RCL 83 

52 - 

53 RCL 84 

54 8 

55 » 

56 - 

57 RCL 85 
56 ♦ 

59 8,12 
69 / 

61 FS' 88 

62 RTN 

63 <*CL X 

64 PROHPT 
65.LBL 82 

66 RCL 82 

67 RCL 84 

68 ♦ 

69 16 
76 • 

71 RCL 63 

72 RCL 85 

73 * 

74 - 

75 RCL 86 

76 36 

77 « 

78 - 

79 12 E-4 
88 / 

81 FS' 96 

82 RTH 



83 "F2<- 

84 FIX 6 

85 flRCL 81 

86 FIX 4 

87 "F)=- 

88 SRCL X 

89 PROHPT 
98«LBL 83 

91 RCL 83 

92 RCL 85 

93 - 

94 RCl 82 

95 2 
% » 

97 - 

98 RCL 84 

99 2 

188 • 

181 » 

182 2 E-6 
193 / 

184 FS' 96 

185 RTN 

186 -F3<- 

187 FIX 8 
166 MCI 81 

189 ■!->=• 
118 FIX 4 

111 RRCL X 

112 PROHPT 
113.LBL "ROC- 

114 SF 89 

115 -X=?" 

116 PROHPT 

117 STO 91 



118.L6L 95 
119 XEO 94 
129 XEO 91 

121 STO 97 

122 RCL 91 

123 RCL 96 

124 RCL 97 

125 / 

126 - 

127 RCL 91 

128 X=Y? 

129 STOP 
139 XOV 

131 STO 81 

132 -R»IC=- 

133 RRCL 81 

134 OVIEU 

135 GTO 85 
136.L8L -EXT- 

137 -X=? - 

138 PROHPT 

139 STO 81 
146 SF 88 
141.L8L 87 

142 XEO 84 

143 XEO 81 

144 STO 88 

145 XEO 82 

146 STO 67 

147 RCL 81 

148 RCL 88 

149 RCL 87 
158 / 

151 - 

152 RCL 81 



153 X=r? 

154 STOP 

155 XOY 

156 STO 91 

157 -EXT=- 

158 ma. ei 

159 OVIEU 

166 GTO 87 
16KL8L "INF- 

162 SF 86 

163 -X=?" 

164 PRONPT 

165 STO 81 
166«LBL 66 

167 XEO 84 

168 XEO 82 

169 STO 8? 
178 XEO 63 

171 STO 88 

172 RCL 81 

173 RCL 67 

174 RCL 68 

175 X=8' 

176 STOP 

177 / 

178 - 

179 RCL 81 
189 X=Y' 

181 STOP 

182 XOY 

183 STO 81 

184 -INF=- 

185 RRCL 61 

186 BVIEH 

187 CTO 96 



188*LEL -8S» 
189 CF 68 
196 1 E6 

191 STO 81 

192 GTO 88 
193«L8l -OS- - 

194 -1 E6 

195 STO 81 
1% SF 66 
197«LBL 68 

198 SF 25 

199 RCL 81 

288 XEO IND 88 

281 FC? 25 

282 GTO 89 

283 RCL 81 

284 / 

285 1 E4 

286 • 

287 INT 

288 RCL 82 
269 X=Y' 
218 CTO 18 

211 XOY 

212 STO 82 

213 18 

214 ST« 88 

215 CTO 88 
216«LBL 89 

217 -PUS RSYNPTOTES 

218 FS? 86 

219 GTO 11 
228 "F£H »00- 
221 PROHPT 
222»L8l II 




Vtptf 



223 "FEN -00- 

224 PROHPT 
225«LBL 18 

226 1 E4 

227 ST/ 82 

228 I E2 

229 FS? 86 
238 CNS 

231 XEO IND 66 

232 RCL 62 

233 1 E2 

234 FS? 88 

235 CHS 

236 • 

237 - 

238 -«• 

239 RRCL 82 
248 -t-Xf 

241 RRCL X 

242 PROHPT 
243«LBL E 

244 XEO IND 88 

245 STOP 
244«LBL -INTG- 
247 8 



248 STO 85 

249 -BORNES »• 
258 PROHPT 

251 STO 82 

252 XOY 

253 STO 81 

254 - 

255 R6S 

256 STO 84 

257 •«=?• 

258 PROHPT 

259 STO 83 
266 ST/ 84 
26I«L8L 12 

262 RCL 81 

263 XEO IND 68 

264 RCL 84 

265 ST. 81 

266 • 

267 ST* 65 

268 DSE 63 

269 CTO 12 
276 RCL 85 

271 STOP 

272 END ■ 



SPIES KILLER 



Les SPLURBS, oxlra-lerrestres que vous apprendrez 
vtto I hair, ton! mamtonant do l'osptonnago...Votre but: 
les oxtermirwr Mais attention, voire r6serve de lasers 
est redutte'" 

Ce programme est ontierement compalibte sur Atmos, 
aucuno modification nest necessaire. 

Dominique MALL FIT 



et» 



a^> s 



1 HIM) '■■' 

2 0ATA3. 3-3. 3-3.3.3.-. ill . 

' ■ i >. 9.9,4.4.4*4,6,6,6,7 

3 DATA3.4.3-4. 3,4,4.6,4,7,1,7,1,5.1 

1.4.1 

4 0ATA7. 4. 7. 4, 4. 4. 7,6.4, 7. 6. 4, 7. 0,4 
.1.1.1. 1,1.1.6.6.6.7.7.*,.*. ■ '. 

6 RESTORE 

-..-inr-i READOO MEXT 

19 FoRfl"33t(rv Frj^e-ero-" 

20 PEODADR 

30 POt* " "".. m> : .|iH* 

4ft MFXT8.0 

*•■ PETURM 

33 DOTni.-i. 8,9. 24.31. in. 2. 4.. i 

'1,1.4... 

60 DATA32, 24,4,4,6.1 

36.48. 40.8. 24 u> 

63 DATAO.Ol.O.l.O.O.ft 1 
.31. 31. 9. 3?. 31. 33. 31. 31. 31. 12 

79 DATA1 
2. 12. 12. 12.39.38,49. 12. 10,19,91, SI ,8 
.8.8 

73 DATA8.0.32.O. J2.0.0, 0,00.00.09. h 
8.24.28.62-62.8.9.0.9," 

88 0ATO6.3. 1.0.9.3-3.9. 17. 14. 17. 17. 
19.23. 31. 1.7. 1.3. I, 9.9, 9. I 

03 raiftO. 9. 0.12.12, U. 31. u. 43. 18.45 

... 

98 D«T«0. 9, 0.0. 9. 0.0,48,24, 48. 32. 9. 

0.48.48,36.34,20,34.34,38.39.62.32 
93 DATR36. 32.40.32,0.9.9.32 
113 DATA3. 4. 3. 4, 3- 4. 4. 6, 4, 7. 1.7. 1.9 

.1,3.3.3.3-6.3.4. 1,3,7.9.7 

128 0ATA7,4,7,4.4.4,7,6.4,/,<. 
.4.3. 1.1.1.1.1 .6.0,0,7, 

123 OHU" 

129 PAPER1 IW6 QfJSije3020O 
129 001 ' 

133 9A-1 DIHX'2 I (,in, 

148 >«0>-31 W1«128 X/2>-2«/ Y<0>« 

rC0) Tz>-v<a/ 
Hi t>inf;i+"j . i 

2 KWi «M '.►*.!-■ 

(7>-2 

143 cm(0>-4 f.M"',-i Dinnxz) i-iKf*' 

9> 

136 «*' ft -■■ : :t>M. '!-'•■ M Jr.'" 04V 1 ,- 

"30314343^631931- 

137 A«v'2>-"1212304y,;lk],M.-- i.v i I 
"3151 1 91 212185131" ft*- i >*" 12*04551 O 
301WI- 

138 F0PB-3TQ9 RKAM1KA-3) 14KIFI 
168 w>K4iii4ft. io«w ("*-i4yij*j.o 1*1*- 

"D.MALLET" 

161 FO* 

104-nm, IN.] " HEXTJH 

162 F0Pll-4>!. ■ ■ I i .,n II 
EXT 1 1 

163 oiMPry-j, DIM! I' j/ D1HCCX9) I I ( B 
,. m/, .-4 C0C2 -1 n*r.|-3T09 

144 COCCI '-"- MEXTC1 
163 PtI-l rjr-AJBUfWQ 

166 hi-i covjettooo 

167 TEXT RMMTCXR39CI7) FPIiiIi MP*** 20 

168 popepo IKK3 GO0U031990 

169 Hl-I PPJMIf,HP*V29> 

I/O MIPEb PBIKTCHttC17) CO8U8901M 

'.■(■! 11009 
172 C 
11 PF/5/-32 RE'6>-98 PE<7w«7 PE' « 



i REAM i. i n i i . 1.C0 '» 



6609 FOPft-l 

M.1H VI tUPFI 
7008 KH 
7901 PIHQ 

7002 FORStNCMTOeSTtP i VMNDI.SQ.l 
3 FCXT SOUHtM.99.0 PLH71.0.4.290 
7810 X-120 Y-108 
7318 | UR1 i I ■ ( i 

■■■■-■ ■ 

.'320 FWt-KEY* ir«*-""IMeniOO«) 

■ . i mm: 1 I'.IM 

■ ii' M ■ M ■ B TWH75M 
7949 '*>:ID 

I0T07529 
7940 f#«r/)ffj810O, 8?O0. 8300.9499. 939 
0,0688.8790,8800. 8900. '*90O 

, . ■ ■■■;■.,. 

'si 10 CURffl t::.v X X 9'CU* ETX.Y 

gotoioooo 

"■I || 223THEH 10800 
8218 CURSE rx.Y.0 X-X*5 CUf El 
ttTOieOM 

Q 188 IF Y-150TMEM1090O 
8316 CURS6TX,Y,8 V f+9-CURSl 
G0T019999 

IMftO IFY-IOTHF.HlOOOO 

ETX.Y.9-Y :'.''■ 
GOTO 19009 

■ ... , m.-. i r/. in : 
BA 1 >.Y YCBA 1 ..I 
8909 vxttC'l. 100.0 S0UND4,1,8 Pi.ftYj . 
1.7.1900 

bsio forih-ito7 urm HH1M3 irexr 
■ r/.inn-i ...v'hh-1 i.e ewamx 



I89IS CUMCTI1 ■ i. i DP9H8.-0.I t*fl 
Ml?. 0.1 DMH8.6. i DWW>I 8 i 

10314 [*OH • .*» I DRAW I.. I DMH-8. 

8 I DftflMQ t2 I (■'■tii- " i '■' ■ i '• 

Wf*,t*- , f - I 

■ ■,,.-. 
i ! i m ■ ., i OfiAue.t i DAM 0,8 i D 

0. 1 



10784 Pt 811 ■ 14 

Ml [[ l.l.'i, 
19786 PL0T1.I6 




BHTTV I I WMMI7,e, 1 "«■ ' ' . . . •- i >.,ifii-..- 



18918 r-eni 0.8,1 DWW8 ■ 1 t*f*H2.o 
i DRAU8 S, I M-F.il. ,8 t DRAU9.0, » t-P<i 

N- 0,1 

■:," . | r.i-.'ii Q | CMMU9.-0 
I DRAM 8. I WWW0. ■ 1 I I '■ 
nun.-*. l 

i !i|.|] ,0 I I ftfUQ ■ i DPflH •. 

8 I ftMUo r:-i DRflU-0,8.1 WWH8.-0.1 

;:■■ ■'. r RAM 0.0 1 DRAM. 12 I PRRM0, 

■ : DRflHi ,0, i 0RAH9 6 i 

■ m 0. i DRAM0,-t2.1 l-FfW-6. 

0,1 DPRW9,-12.1 DRAM-|0.e,l DRAW,-* 



19700 Pt.0T1.19, a Av«<: l»i iifiii . ■• 
1* b#rr» K8RA1 I 

19710 PL0T3.28.4 H_0T3.;i» " llh 

MMftt' PLfJT3.22-«l PI.9T3-2? -' '" Fin 



■ 



[0713 « 'irn.ii... 

1M714 PPIHT" >- 

18713 C8-0 TI»--- 

1<V1*. <A f lr» IFfrt-- "in Hid,'.-' ■ 

10719 1FR?C '94)-9TMCtl1ii. '" 

10720 IFftSC CA8)>^THeN1073 

10721 OTTO10716 
19722 8A-4CRHCM *i .Y3 ■ 
10724 IF*-.ft' >69TMEHI8727 
10729 IFCA*6TH£Ht971< 
10726 XC-XC-1 'PLOTM ■■ 
TH-LEf-14' ri«,Cfl ■ COTO107I0 

18329 L-9AH12.0 I ' W-' ]i ' ■ 

II 12,1 l*IH*.,24.I 0R8 197?1 PL •-(>*■-,. -, M . Hu; ■ .' f%» I 
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SABRE LASER 6 p£\C ETE N00 



Les rfcgles du jeu sonl simples, il faut toucher son ad- 

versaire 4 tois pour le luer A chaque fois que vous le 

toucherez. il changera de couleur, au dernier assaut il 

s'efrbndrera. 

Ce jeu se joue a deux. Les explications complementai- 

res sont dans le programme. 



Eric CASSINI 



TV 



99/A* 




?30 CALL CLEAR 

240 CALL SCftEEN<7> 

?SO T1TRE«--S» VWALIER" 

7*0 DISPLAY AT(9,9>tTITRE» : : FOft 1-1 TO 

SOO II NC*T I 
2TO FOR I- 1 TO tt. 
2BO READ CA.CE> 
r«0 CALL SOLWDlCA.CB.IO> 
ZOO HEU 1 

3IO DATA 500.220.450.163.100.147,100, 139 
. lOO, 123.300,220.450, lt.3. 100,147,100. 139 

,--X>.220 
330 DATA 450,1*3.100.147.100.159.170.147 
, 60O. 1 23 
330 CALL CLEAR 
3*0 WtlNT -APPUVEI SUR( R 

POUR LES RE6L6S DU JEU 

J POUR JOUER- :l INPUT ftj 



460 CALL CLEAR 

470 CALL MAGNIFY (3> 

460 CALL CMAR(72.-707E5F5E7EIB617FFFFFFF 

7FtF£7F3FBAO9OO000OOO0OO00OOBOCOE0F0FBFC 



M00S0C0C0901010I 



ft70 CALL SPR1TE(»7,64. I 1, 140. 122 p O.O.»e. 

4o. M. 136. 122.0, O) 

ABO CALL SPRITE (•9,44, II. 172, 114. 0,0, »10 

,BO, 11,172, I 50,0,01 

690 CALL SPRITE t»l i.BB.B, 140, 106.0,0) 

700 CALL CHARM36,'1F20444B64520C7F"> 

710 CALL CHAR1I37, "B2CD40201O1B1O7C-) t : 

CALL HCMAFM20, 3. 136)11 CALL HCHAR(20,4,I 

37) 

720 CALL MCHAR<22. 26, 136)1 : CALL HCHAR12 

2,27,137,2)11 CALL HCHAR (17,1, 12B.52) 

730 CALL HCHAR(I7,22. 1291 i: CALL HCHARIt 

B,21.130):l CALL HCHAR ( IB, 22, 131 1 

740 CALL COLOR (14.14. I ) 

730 CALL CHAR(12B,"OOOOOOOOOOOOOOFF"I 

760 CALL CHARII32. "OOOOOOOIOOOOOOOO") 

770 RANDOMIZE 

780 FOR t-1 TO 46 :: ASE-INT <RND»161 *t 

790 BSE-INT(RND»32)*1 

BOO CALL HCHAR(ASE, BSE, 132)11 NEXT 1 

810 CALL CMARI121. "07OF3FlF3EFEBEB7-> 

B20 CALL CHAR1122. '■B0BOBO0B0O04OCBC"! 

830 CALL CHAR! 123, "C7676F2F0F070000" > 

840 CALL CMARI124.-SC88D8F0C08OOOOO-) 

8SO CALL HCHAR12.22.121I 

B60 CALL MCMAR<3.22, 123) 



124) 

O102B2B2442326A"; 
644AFF-] 



330 IF RJ«--J- 
360 RE8LE«--Vo 

TJO REGL*-- A 

d* 1 4 dK1*rg« 



THEN -»60 









390 LSE«--. ..EPEE LASER...* 
390 CALL CLEAR 

400 DISPLAY AT(8.2)lREGLE« ■: DISPLAY AT 
(11.2tsRE0L» :: DISPLAY AT ( 17, 71 :LSE» 
410 INPUT -APRUYEI SUR C POUR CONTINUER. 
-:COMT« :: IF CONT»-"C" THEN 420 
420 CALL CLEAR 

430 MANIP*--TOUCME E:EPEE EN HAUT 
TOUCHE UEPEE EN BAS TOUCHE D:ATT 

AOUE JOUEUR A SAUCHE" 

440 WAN IPS*-" TOUCHE PiEPEE EN MAUT 

TOUCHE :E=-EE EN f<AS TOUCHE L:AT 

TAOUE JOUEUR A DROITE" 

430 DISPLAY AT(2.2l:«ANIP« :i DISPLAY AT 

iHANIp; 

. 



340 CALL 5 

530 CALL CHAR(64.-0000000000000000000000 

OOF F FFF F00000000000000000000000040A09F AO 



370 CALL SFRITE(»1,36, 13. I40.8B.O. O. »2. 7 

2. 13,136.89,0,0) 

5BO CALL SPRITE(«3,4B. 13. 1 72.B0.O.0. #4. 9 

6. 13, 1 72. 96,0, 0> 

390 CALL SPRITE(«. 108.9, 140. 104.0.0) 

600 CALL CHW»(64,"OQ0OOOO<>OOOOOOOOOOOOCO 

;afC7F;F'JF3S7CE>EiliE&E7C3B(XJ3C7EEEF6F676B6 

FA") 



870 CALL HCHAR(2,23,1 
880 CALL HCMAR<3,23,! 
890 CALL CHARM 
900 CALL CHAR! 130, "0BOC121: 
9IO CALL CHAR^i3l,-9682All5090IOIFF , ■) 
920 CALL HCMAR(16,26, 129) 
930 CALL HCHAR (17, 23, 130,31 
940 CALL HCHARU7.2A, 131) : : CALL HCHAR ( 1 
7,3,129)11 CALL HCMARI 16,7, 129) i : CALL M 
CHARU7.6, 130,3) IS CALL HCHARC 17, 7, 131 ) 
9SO CALL HCHARI17, lO, 130>1 1 CALL HCHAR I I 
130,2) 

60 CALL COLOR (13, 13, 1) 

70 CALL C0L0R<I2,S,2) 
9BO CALL CHARU12, "O03844BA82B24439") 
CALL CHAR(II3,-0O3F409FAO9F8O7F-> 

OOO CALL CHAR(114,"OOFlOAFClFFCOOEB"l 

010 CALL CHARM 15, "OOFCO2OOFF0OFE0O" ) 

020 CALL CHAR(1I6,-0000FF0BC808FF00") 

030 CALL CHARd 17, "382828E81008F8I8") 

040 COUP-O it CP-0 il AQ-1 :i AW-3 :: B 

i-7 ti BM-ll !! Y-IO 

030 REM TEST 

OAO CALL KEYU.R.Sli: CALL KEY<2,K,T> 

O70 IF 5-0 AND T-0 THEN 103O 

OBO IF Y-10 THEN I lOO 

090 IF TOO THEN 1300 

I0O IF SOO THEN I t 10 ELSE 130O 

110 IF R<>3 THEN 1140 

120 CALL DELSPRITE(«6,«12) 

CALL SPRITE(»AO,36. 



At*. 32, 9, 140. 104.0,0) 

II60 >■■> II CALL C0INC(O3.«t I, K'.TILXl 
CALL COINC((rl2,»22, lO.ToQL) 
1170 IF TIL — 1 THEN CALL SOUND ( lOO. -«,B) 
II GOTO IOSO 

I ISO IF TOL--1 THEN CALL SOUND ( lOO. -6.6) 

II GOTO 1030 

1190 IF R' >3 THEN 1030 

1200 CALL LOCATE I4AO, 1*1. 103. t)2. 136. 103) 

12IO CALL LOCATE(«3. 172, 93. M. 172. II I J 

1220 CALL LOCATE t MAM. I 40, I I 9i 

I230 CALL C0INCC3.H2O. lO. IUL) 

1240 IF TUL--1 THEN CALL COLOR'.*. ■-..'.■ '.. 

7.4B./.M. 7,»10.7)t i COUP-COUPM i! IF r 

OUP-4 THEN 12BO 

1230 CALL DELSPR1IE(«6,«12.»I ,*5l 

1260 CALL LOCA(E(»AD, 14(»,B9,«)2. IT^.BO.i: 

CALL L0CATEI43. l72,BO.»4. I72.96MI CALL 

LOCATE<»AH. 14". 104) 
1270 CALL COLOR I "7, 1 1,49. 1 1 ,€-?. 1 1 ,•!•>. 11 
,#20. 1 I > r : BOTO 1030 

1380 EMU DELSPftlTEI«7.«e.9*>,*IO. •::.*. 
,•231 

1290 GOTO (49') 

I SOO IF i 1 l THEN l ■ CO 
1310 CALI DEI '•< f i n 1*20, •22) 

1320 PO* ' ;: BW-ll ;i TALL SPRITE(»fJ.64 

, I l ,140, l22,0,0,«B**,ee,e, 140, IO6,0.0>ll 

GOTO 1360 

i J30 IF I i ' new I 360 

i MO cm i. DEI f. r f ■ i if. [»7,#1 I I 

1330 BQ-20 :: BW*23 :: CALL SPRITI II 

", 1 i . l^". 122,0.0. •BM, 36, B.140, 106,0,01 

1360 y-io :i CALL C0InC(*11.*S. 10. TY1 lii 

CALL C0INC(*22.»12, IO.TAL) 
1370 IF TVL--I THEN CALL SOUND < IOO. -6,9) 
ii GOTO 103O 
1380 IF TAL--1 THEN CALL SOUND ( IOO. -B. A) 

II GOTO 1030 

1390 IF K<>12 THEN 1030 



, ; . CALI CHABII 



■3FIFOFOF020I 0003040403 



1400 CALL LDCATE<«BO 
1410 CALL LOCATE (•9,: 
1420 CALL LOCATE (•BW. 
1430 CALL C0INC(«22,» 
1440 IF TEL' 
.•3, 7, •4,7,' 
EN 14SO 

1430 CALL DELSPRITEt* 
1460 CALL LOCATEtBBO, 
: : CALL L0CATE(«9, 172 
CALL LDCATECB8W, 140, 
1470 CALL COLOR(«I,I3, 
•6,13)11 GOTO lOSO 
I4BO CALL DELSPRITEt" 



,107.1 



i. 136, 107) 
113) 



•10, 1 



4.TEU 

1 THEN CALL COLOR(*l,7.»2.7 
i IF CP-4 TH 



.•1 :.■:■".■.:■ 

40, 122, BB, 136,122) 

114, aiO. 172. I30>n 

OA) 

•2. 13, K, 13.C4.I3, 

.■2,t3,*4,4rS,M,«l 



3, 140, 88, ( 



', 104.. 



1 1AO 

40 IF ROO THEN 1160 
30 CALL DELSPRITEr»l.«5l ; 
1 it CALL SPRITE(«A0.32.i: 



1490 CALL HCHAR (24 
1300 CALL HCMARI24, 13. I 
1310 CALL MCHAR(24. I 
1320 CALL HCHARC24, 15, 1 
1330 CALL HCHARI24, I 
1540 CALL HCHAR (24,: 
1330 CALL COLOR 11 I ,', 
1360 FOR I-I TO 200 
1370 CALL CMARSET ti CALL C0LDR(3.I6. 
, 16, 1,7. 16. l.B, 1A. 1) 
I3BO CALL DELSPRITE(ALL) 
1390 FINC--POUR REJOUER APPUV1 I BUT ifl 
SINON SUR I 
11 DISPLAY AT(3.7lfrFEF'iF IN* 
1600 ACCEPT AT(iO,2) [FIN* 
1610 IF FTN*--R" THEN 460 
1620 END 



MINI GOLF 



Avez-vous d6j& jou6 sur un FX au golf? Voici un pro- 
gramme qui vous permettra de vous initier aux joies et 
passions de ce sport. 

N.B.: Vous n'avez pas besoin de porteur pour vos 
clubs. 

Christophe CHARLES 

Le programme est constitue de deux parlies: 
P1 constitue le programme principal (gestion mouvements, tirs, de- 
placements). 

P2 aftiche ies messages, gefe le score. 

line tois 702 MINIGOLF tape, il faudra initialiser les scores par; 
STAT 1000. 1000 < EXE >. 

Lancer le programme par F2 RUN # 1 . Le joueur est represente par 
I. les irons par \ et la balle par . 

Vous vous deptacez avec L et N. Vous declenchez le tir avec T.Pius 
vous appuyez longtemps, plus le tir sera puissant. 
Les deux oiveaux de jeux se drfferencient par: 
Niveau 1. 10 trous, 10 essais par trou. 
Niveau 2. 20 trous, 6 essais par trou. 

Si vous echouez a un trou. la parlie s'arrete. La touche A vous 
permet ators de connaitre le nombre de coups joues par trou. 




702 P 



USI I! 

2 VIIC :P=i!!l=12iS 

010 < 

3 *««CH»RLES CHR 
ISTOf«E««" 

4 Will !8:!="MU 

LF-CiFM 

:=: -': '/.?"■ cs 

f i;!,":HEK! I 
'; [HP "H1VERU tl> 

2!Ml:lFH>!;IF 
M THEN 5 
:? IF 3=::L=;:«=2! 

:X=52--6OT0 15 
IH=U*11 
15 M:6=HE=5 
28 C=1KI (WW<I2.' 



-*.-'V ESI !5:;;:V 

t=KEV:IF n-V 

:SS8 1888 
58 If V«=T!SSB 2 

888 
68 IF «=*T* THEH 

5888 
82 IF W=*fi"; PRT ■ 

■jIMUPSs'lOlK 

e 1984 
i5 60T0 48 

ii if KiM-.tne 

760 

T5MtI:IF0=LTH 
EH 588 



188 8010 48 

588 l«!! 4!t?'T "'■■ 

"\m itRuvflis. . 
! - wo see 

'88P=PH:t=OtO:0=e 
:E=P*p: IF F=lt I 
KEN 12 

795 i--m 

718 BRIT !5:PtT ", 
CSF. ll'JOU COB 
F.. " 

mm', !8:PPI II 
Oil »:"iP: IF Z=l 
iZ=t!60TO 15 

735 8S8 1884:6010 4 

e 

988 KBIT 15W "W 



E BUTRE PflPTIE 
i" 

985 B4EYS1F 01="" 
THEN 995 

918 IF M="0" THEN 

2 
915 PPT "HO 8EV0IP.. 

.*,"ifflD 

eee pit csr «r "; 

862 R=B-l:IF a<8:R= 

e 

ee( PRT CSR B!"."!C 

a ci"n 

886 PPT CSP Bi'I"" 

RET 

PRT CSR 81" "I 

fi--fltl:!F8>14l» 

=14 
884 PRT CSR BlViC 

SR t!"f! 
888 PRT CSR Bl'I"!! 

RET 
3888 IF R«B»!;IF «>8 

-lilffllT I8:PRT 

"","H0H":6SE 13 

B4:60TO 48 
1882 IF B(RiY=l:60T0 
3888 

y=e 

;886PRT CSR «!"-"" 
FOR T=8 TO 29:« 
!=KEY 

:8B8 IF «««"!" THEN 
4882 

:eie next t 

PRTCSRfl;"I";: 
FOE 1=9 TO T 
884 PRT CSR Bl" "I 

if T=ne=B-niF 

S / 8'6-14 
1887 If 1'\ THEN 481 

9 
888B=Btl:IFB!14!B 

=8 
818 PRT CSR OTIC 

SR HITS 
8I2FRTCSF Bi'.'SI 

HEX! I 
828 80T0 78 



LIST 12 
18 i="C0N6RRTUlRTI 

0HS":F1!T 
28 FOR 1=1 TO LEW 

t) 
25 HBIT 18:PRT CSR 
3;HID!1,I)"NE 

XT I 
38 FOR 1=8 TO 5:PR 

T CSR 3)I,"":NE 

XT I 
35 PRT "RESliTRTS 

48 R=P«:«R1T 48 
188 IF 8=KlPRT TO 

ICITRTI0HS";"P8 

S UHE FROTE !" 
118 IF (UN; IF 9(11*1 

9;PRT "BOH PRRC 

OURS !■ 
128 IF QMMBMF 0£ 

H»28;PRT "TRES 

HOYEH.." 
138 IF «>IMJlP«T " 

CHRH8EZ BE CSNH 

E.. 1 " 
148 S=X<R:PRT "COUP 

S:";g:PRT "SCOR 

E:"iS 
288 IF S<SX:IFN=1! 

E=3Y:SRC :STRT 

S,E:PRT "HCUVER 

U RECORD..!" 
218 PRT "RECORD li" 

ISX 
215 IF S<SYHF H=2I 

E=SX:SRC :STBT 

E,S:PRT "HOUYES 

U RECORD..'" 
217 PRT "RECORD 2:" 

ISY 
229 KBIT 8 
388 PRT "UNE BUTRE 

PRRTIE !" 
385 VI =KEY: IF Vt="" 

THEN 385 
318 If Vl="0" THEH 

II 
329 WRIT I5:PRT "RU 
REYOIR. ..'■■": 

EHD ■ 



ERRATUM sur FX 702 P 

PETITS CHEVAUX Hebdo n° 39 
Nous avons oublie de mettre le 
schema oe deplacemenl des 
chevauK 



SCHEMA DU PARCOURS 
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A: HANGAR DES CHEVAUX DE L'ORDINATEUR. 
77: SON ECURIE. 

B: VOTRE HANGAR. 
98: VOTRE ECURIE. 



ERRATUM sur APPLE 

COMPLEMENT DU PRO- 
GRAMME RECORD 2 (N* SPE- 
CIAL AOUT). 

Dans I'option "suppression dune 
fiche", II taut considerer le cas 
oi'j lutilisateur no souhaite pas 
confirmer leftacement de la 
tlche. Colte omission ne peut 
pas entralner de veritable 
comportement dofectueux de la 
part de 1'ordinateur. mais peut- 
Gtre a la source d'une erreur de 
manipulation (involontairo !). Au 
lieu des deux lignos (pour 
APPLE He) : 

5200 X= PEEK (- 16381): 
POKE- 16368.0: IF X< >127 
THEN 5200 



5210 HOME. 

II tallait mettre (pour APPLE lie): 
5200 WAIT 16384.128: X 
PEEK ( 16384):IF X< >255 
THEN RETURN 
5210 POKE 16368.0: HOME. 
Pour adapter cettrj modification 
a I'APPLE II, ou APPLE IIH ,11 
taut proedder commo decrit 
dans I article c'esl a dire rempla- 
cer le message: "contirmer la 
suppression par < DEL >*...par 
le messago 'Conlirmer la sup- 
pression par ESC" ot cornger la 
hone 5200 comme suit: 
5200 WAIT 16384.128: X 
PEEK(- 16384): IF- -155 
THEN RETURN. 



POLC POSITION T 



ILS SONT TOUS LA ! 

Retrouvez chez vous les super-stars desjeux d'arcade d'ATARI, 
Us sont tous la : des celebrissismes PAC-MAN ou GALAXIAN 
jusqu'aux recents JUNGLE HUNT ou POLE POSITION. Le gra- 
ph isme, les couleurs, la rapidite : tout y est, il ne manque que le 
monnayeur et I' ambiance enfumee des cafes ! 



CEwnpfDC T 




JUNGLE HUNT T 




ETTOUJCURS 
10 % DE REMISE 
POUR LES ABONNES ! 



GALAXIAN 

D'innombrables hordes 
d'extra-terrestres en rang 
d'oignons se pressent sur 
tous les ecrans de tous les 
ordinateurs du monde pour 
se faire descendre par des 
Ufa de laser implacables, ils 
sont tous des entants de 
SPACE INVADERS et de 
GALAXIAN, mais qui a ja- 
mais fait mieux que les es- 
cadrons de GALAXIAN qui 
attaquent de tous cdtes et 
obeissent a un chef ? A bas 
le rectiligne ! 



ROBOTRON 

Plus on avance dans les ta- 
bleaux du jeu et plus il y a de 
monde pour vous attaquer 
et. comme il faut se depla- 
cer et choisir la direction de 
t>r de votre anti-robot laser 
gun avec le meme joystick, 
il vous faudra un grand en- 
trainement pour arriver aux 
25.000 points qui vous don- 
nerons droit a une vie sup- 
plemental. 




DIG-OUG 

OIG-DUG. le petit mineur. n'a que son scaphan- 
dre et sa pompe a velo pour aneantir Pooka - la 
taupe hargneuse - en la gonflant d'air jusqu'a ce 
qu'elle eclate. Mais Fygar le dragon et ses freres 
cracheursdefeusontaussilapourl'empecherde 
recuperer les fruits qui parsement le sous-sol. 
Peut-etre amvera-t-il a les ecraser avec des ro- 
chers? 



PORT GRATUIT ! 



CENTIPEDE 

La commande par boule 
qui actionne ce jeu dans les 
cafes est difficile a manipu- 
ler. Avec un joystick ou me- 
me avec le clavier le jeu est 
encore plus attrayant : Les 
mille-pattes zigzaguent a 
travers I'ecran, la puce dia- 
bolique seme des champi- 
gnons partout face a votre 
pulverisateur de DOT, sans 
oublier les araignees sau- 
teuses et les scorpions ve- 
nimeux ! 




DEFENDER 

Difficile de prevoir d'ou va 
venir le coup, du haut, du 
bas, de la droite. de la gau- 
che ? Lequel des 14 enne- 
mis presents va attaquer le 
premier ? Dois-je alter en 
avant ou en arriere. accele- 
rer ou f reiner, voler en rase- 
mottes ou zigzaguer ? Utili- 
ser mes lasers ou une de 
mes trois smart bombes ? 
Aussidurdegagnerquesur 
I'origlnal meme avec le 
scanner ! 





MS. PAC-MAN 

La petiteamie de PAC-MAN 
a beau avoir une favour rose 
dans les cheveux et user de 
tous ses charmes, elle n'en 
a pas moins les pires ennuis 
avec les quatre fant6mes 
qui la poursuivent. Et il lui 
faut. elle aussl. errer dans 
un labyrinthe en croquant 
des pastilles d'energie 
Meues Ce n'est pas une 
vie, meme pour un glouton 
femelle ' 



MOON PATROL 
Qui ne connait la petite jeep 
bondissante au-dessus des 
crateres. putverisant les ro- 
chers. abattant les meteori- 
tes, evitant mines, tanks, 
ovnis et plantes carnivo- 
res ? Deux niveaux : novice 
et expert de 26 e tapes cha- 
cun Tous les 10 000. 30.000 
et 50 000. vous gagnez un 
vehlcule de patroullle sup- 
plemental. Objectif ; pro- 
tection planete Lune ! 




OONKEY KONG 
Mario, le charpentier. es- 
sai e desesperemen t da rra - 
Cher sa fiancee des pattes 
de Donkey Kong, le gorille 
geant qui la retlent captive 
tout en haut d'un amas de 
poutrelles brisees ll lui faut 
affronter des cascades de 
lonneaux, demonter des ri- 
vets, emprunter des ascen- 
seurs fous ou encore errer 
dans un dedale de tapis 
roulants charriant des ba- 
quets de sable. Dur, dur I 




POLE POSITION 

D'abord les essais pour sa 
voir oil sere place votre bo 
lide sur la grille de depart, 
puis c'est la course propre 
ment dite. virages seires. 
crissements de pneus et 
accidents avec voitures en 
flamme ! Graphisme, cou 
leurs et trois dimensions, la 
star desjeux de cafes ! Trois 
niveaux de difftculte. deux 
vit esses et des compteurs 
partout ! 




JUNGLE HUNT 

Sauter dune liane a I'auli 
depouiller des crocodile;, 
se faufller sous des blocsde 
pierre, enjamber des ebou 
lements et affronter de sau 
vages cannibales alors que 
vous n'etiez qu'un amou- 
reux transi et oisif ? C'est 
peut-etre la vue de votre 
petite amie en train de com- 
menceracuiredanscett.es 
marmite qui vous a change 

STARGATE 

Plus rapido. plus difficile 
que DEFENDER, presquo 
mjouable ! Les ennemls 
sont innombrables. plus re- 
pides et plus sournois les 
tins que les autres et I'hy- 
per-espace n'arrange pas 
les choses. elle ne fait que 
retarder votre disintegra- 
tion iEsperons que vous ar- 
riverez tout de meme a sau- 
ver quelques-uns des hu- 
manoides qui comptent sur 
vous pour rentrer chez eux ! 




%*? 



r une au- 



TOUS LES JEUX FONCTIONNENT AVEC LE CLAVIER OU 
AVEC LES MANETTES DE JEU. 



JOUST 

A calitourchon s 
truche. une lance a la main, 
vous combattez les buzar- 
diers sauteurs. chasseurs 
et seigneurs Mais ne 
croyez surtout pas que ga- 
gner une bataille suffit. les 
vaincus pondent des oeufs 
de frustration qui sont en- 
core plus dangereux si vous 
avez le malheur de les lais- 
ser ecloro La joute est ou- 
verte ! 



TABLEAU RECAPITULATIF DES PRIX (PORT COMPRIS) 














iWi$^kM^ii- 


VIC 20 .».„„„,, 


315 


355 


335 


355 


335 


355 




355 


315 


335 


335 


335 




COMMODORE 

64 (MODULE | 


345 


395 


365 


395 


365 


395 


345 


395 


345 




365 


365 




T.I. 99/4A (Moouiri 


330 




345 


375 




375 




345 




345 




345 




APPLE II mm 


380 


430 


400 


430 


400 


435 


380 


435 


380 


400 


405 


405 


405 





PAC-MAN 

Le soul, I'unlquo, 1'lncompa- 
raoie : toujours coplo, ja- 
mais egale 1 19 tableaux dtf- 
ferents. de la cerise a la do 
on passant paries citrons et 
les cloches. Bllnky le rapl- 
de. Pinky le soumols. Inky le 
malln et Clyde qui vous 
coupe le passage, vous at- 
lendent. Si vous atlelgnez 
10 000 points vous gagnez 
un tour gratuit et le record 
du monde est a battro I 



| BON DE COMMANDE A DECOUPER OU RECOPIER : 
I SHIFT EDITIONS, 27. rue du Gal Foy 75008 PARIS 



Prix Qto Montant 



MONTANT * pay* 

\ date de la commend* : 

■n valablapour la ma I Altai an aloe k, una lamaina* pa/tuda I* Oalada paiulion En 
»flafiiti1mada amek. chanua (anvoya aou* hull atria « 4( f 



SPACE- FIGHTER 



constante. Si par malheur voire capital Tir est nul. voire 
avez perdu la partie. Bonne chance et... tongue vie! 

Sylvain BOULAIRE 



Le titre du jeu est "Space Fighter". Aux commandes de 
votre vaisseau spatial, vous etes dans une situation 
embarrassante: un chevalier de I'espace nomme 
Space Fighter vous a lance un defi et communique 
avec vous par lintermediaire de voire televiseur. De ce 
combat, vous ne sortirez pas vivant, et vous devez 
vous battre pour vivre le plus longtemps possible. 
Votre ennemi dinge vers vous ses "Spattles", vais- 
seaux de combat rouges qui cherchent a entrer en col- 
lision avec votre vaisseau pour le detruire. Chaque col- 



lision vous fait perdre une vie, et votre capital au 
depart se monte a 3 vies. Les deux asteroides repre- 
sentent eux aussi un danger permanent, car ils peu- 
vent vous heurter, mais leur Vitesse de replacement 
est lente, et vous pouvez les eviter. Du moins je I'es- 
pere pour vous! Quant aux vaisseaux blancs, leur role 
est particulier: en les detruisant, vous recevez un 
bonus qui augmente votre capital-tir.affiche en haut a 
droite de I'ecran et qui est au depart de 100. lis sont 
difficiles a viser et represented eux aussi une memoire 



Ce programme est destine a une utilisation avec manettes. Sans 

manerts il taut operer les changements survants: 

2000 AS = INKEYS 

20t0 BS = INKEYS 

5000 IF AS = CHR$(11)THEN LET YA = YA - 1. 

5005 IF AS - CHRS {10)THEN LET YA = YA + 1 

5500 IF B$ = CHRS (70) THEN 551 1 . 

Le programme est en deux parties. La premiere partie (les regies) 

charge le jeu proprement dit qui dort porter le nom B57 2 (sinon 

changer la Ikjne 800). 

La premiere partie est facultative. 



il =E*>v. ■,•.■,•.'. •"!£-=:;;;- 

-. = £ : .~-':-il :\:\\::\\:\:\'.'.::\:::- 

14 ATTPfS 9.9 
13 Y-9 

IC K-8 

17 EXE Aft,. 9 

is u-iee 

: - tCHl Ult!tO€FII 

:•. a. 4.4 
:: :z~:-t 4 >,?.'.i. 

2 

ti :t-^t - 'in'. 



•■ .■---: : .i: ■. ■. ■. ■. ■. : 

»2. 248, 246, '-. 

76. 24*, 248, 232, .-■ 



e3*DCFGIt«<6> 

24 :e';pi - 

25 DEFfcCf.9 



-8,8,1 ....-.: j 
(251,14.7.3. ..;■..;.-; 
•248.248,232, i TT - £Tt .iZ 



J3 DCFCM : -246.248, :z~ 



6,86,124,40, , t 
33. i3-. 136,248 



:- :t- y-i i 
37 DCFCJtX : 

39 PEn::::: 

58 XB-39 

ii ------ 



75 F-6 

76 G-l 



126.127,53,46.2. 
-28, 26, 57,113,114,68,22,- 
)MMNEES:::ttii:g:f)iift:t! 



DIAMANTS sur TO 7 

PERSISTONS ET SIGNONS. 
Aux persortnes qui ont tele- 
phone a SOS BUGS, vendredi 
(fun ton indigne...Verifiez bien 
voire listing, i) n'y a ni bugs, ni 
fautes d'impresson dans le 
nfitre. Sans rancune. 



9! H-20 

199 5 E- = •■■■---. iDEPLACEHENT ■ _~- 
368 : = :-::-=--: 

1%*, -> — ;:: = >i:: = I-:: :,= >; 

459 Rf3IItiti>t8En.AGCHEin : .■ :■ 

'.'■•'. IF ioe.3 --:■. sore zzi 

511 : 7 . = ?. 3 then : :c i = 3 

5:3 :=■ . s.; --;> 3=3 

339 e>b-: 

55: -=--: 

3S2 :=:-: 

333 H=H-! 
33* J =.-: 
335 «<*•: 
343 GOTO ?ee 

— ■■ ====:-: 

571 '=r-! 
372 :=-.-. 
573 - = --: 
z~- j=.-: 
57* it'll-; 

573 PETUPN 

398 - = --: 

3?: E-E-I 

'•= :=:-: 

-':■ - = --.. 

799 =:-:::::::_:-:-I: II L'EC* 

:' - -■=-;. 
--->: :■ = = £7 --e _:- s = s: 
;■:■ IF E =: THEN LEI - = - 

;^i :r e =;- --:i lei &»22 

5j^ (F ; =: 7W3I LCI : = - 

9M : r i "38 TICM :3£S 

397 IF r,=23 THEN LE - ; =;T 

;;■; :- F =: thch LEI r =: 

an : r j-= *s "-eh :?;e 

i:> IF - -23 "KES -I - -si; 

311 : r - *: the« -" -=: 
l:£ IF : *--■. --lh v-.^ 
»13 IF J>»Z3 THEM LET J-23 

a;4 :- _ «j rMEii lei . = : 

: :* IF - «38 "fCH 1950 

'::-: IF *« =2.1 THEM LET * = = ; 

; - : r . ^; --r., _r" -. = ; 

.■-. -Z-- ■■■■■■■■ :-'': :--:E: -:::: 

--.:■ ZLS 

---■-■: LOCATE -.; : ::.: ; I 

»■ areue ^>^ 

>^i LOCATE :-'. - .'--"' I 
_i »8 
■■■■ LOCATE E,F:COUW 3 
:-e3 po;h- -,;i : 
-^^ locate o. -: :ouw ' 

?97 **;*• ---i i 

..-*::. jscolob -. 

989 sc;x- - I 

•:* locate -•■•: ::.:= i 
-■: : EOSUS 998 
995 EOTt 
998 PftlPTT ^i' I 
'-'■'- - E 1 : 

1888 BEfffl'SI'lCOLLII :: - 

Ef == ft OB 8-VB THE 1881 
1882 - = : 

;??r B-lHT'PHOf^' 
JT< 388 
. ; IF |>-Yfl M 0-YE FHEI :■:>- 

.... 

1812 &•!« ,•;! 

:ill GOTO EM 

:&£e IF '■ M OR r = = "- : 

1921 E<1 




1923 


v :■■■■ 




--::■: 


;r h, m :-P H= : "-£-. :C000 




1931 


G"I 




1932 


Hb1NT<RM>*23) 




1933 


GOTO 299 




1949 


IFJ»YA OP J»'i'B THEM 10908 




1941 


1-1 




1942 


J-1HT (U*23 




1943 


;o-: :■■:■ 




1959 


IF (t-Yfl OP H»iB THEN 19969 




1951 


n-i 




1952 


N-IMT.U'C. 




1953 


GOTO 299 






PEtt: : : : : : : MOU'-'EnEHT i'U JOUEUP: 




2999 


L-STICK<9' 




2993 


GOSUB 3909 




2696 


IF YA>-21 THE* LET YA-2I 




2997 


IF V- =e THEN LET Yd-0 




299S 


VB-Yft-1 




2999 


LOCfiTE KB/VAl PPIHT GB*<4>iL0CATE 


8.Y8 


:PPINT GP.f'S.' ;lo;«te -. ~ :--:■.- 


iP*' s- :L0ChTE XA,Ye :PfiI*T GRK7) 




2910 


Z«STPIG<6> 




2013 


G0SU9 5599 




2039 


GOTO 299 




5909 


IF L-l THEK LET YA=rt-l 




5095 


IF L-5 THEN LET YA»VA*1 




5910 


PETURK 




5509 


IF Z— 1 THEN 5511 




5505 


PETUPK 




5519 






5311 


U-U-l 




5512 


LOCATE 36,9:PPIHT U 




5513 


IF M=3 THEN 19398 




3515 


IF Y(S=F THE* 5753 




5317 


IF YA-H THE* 5779 




5530 


IF YA*B THEK 5790 




5532 


IF Yfi-E. THEN 5725 




5334 


IF VA-H THEN 5S88 




5536 


IF YA=J THEN 5735 




5599 


PEH:::::::TIP ?ftTE:::=::: is!!: 




5600 


BEEP 




5603 


FOR fgh=394 TO 14 $TEP<-19> 




5619 


LINE'FGH-6, (YB»3j '-'FGH. YB*3; 




5613 


NEXT FGH 




5629 


RETURN 




Q 5699 
^ 5799 


REflldiSiiTIfi SEiJiS::::::::::: 




FOP FGH=394 TO <<ft!3/*6v STEP 


'-IBi 


Q 5702 


LINE'.FGH-6, YetS/-^FG - H.VB«8',3 




J 3 5719 


NEUT FGH 




LOCATE A,BSCOL0R 2:PP:nt 599 




"7J*5715 


Jt-X+588 




■k? S718 


FOP BGT=9 TO 28 




5717 


NEKT BCT 




5719 


F*"l 




. 3719 
\L 57£0 

'T 5725 


B-INT(U«23> 




PETUPN 




FOP FGH=394 TO (<C*8>*-6) STEP 


-18) 


\ 3727 


LI«E'FGH-6.YB«8/-'FGH. YBM .3 




J 5 ? 29 


NEXT FGH 




" 3731 


LOCATE CDrCOLOfi SsRRIKT 508 




5733 


X=Z»599 




5735 


FOP BGT=9 to 20 




5737 


NEXT BGT 




5739 


C"l 




5741 


r>=IHT'U423.> 




5743 


PETUPK 






FOP FGM-364 TO ■ E.- : ...;. BTEP 


'-19> 


5752 


LIHECFCH-6,YB«g -iFCM, rEM8>,3 




5754 


NEXT FGH 




5756 


E-l 




5753 


F>IMT<U823) 




5769 


RETURN 




5779 


FOP fgh=3?4 TO CM -i STEP 


-\h 


5772 


LINE ' FGH— :,YE*5 -'FGH. . £»3 ■ ■ 3 




5774 


NEXT FGH 




3776 


G=I 




377S 


h=;nt'u« 2 t. 




5789 


RETURN 




3733 


FOP FGH-394 TQ :•";.--; -;'"■> 


-10. 


3737 


LIWE'FCH— I. :l*\ -■--.-. ,B»: .-.' 




5789 


NEXT FGH 




5791 


LOCfiTE I, J:C0L08 feiPRINT 'INT' 


ja 18 > 


5793 


U*M*' INT- ij«;S 




5795 


1=1 




5"-: 


j-nrr<ew>*23J 




3797 


fop bgt=0 to jee 




3793 


NEXT BGT 




3799 


PETUPN 




5399 


FOR fgh=384 TO (tR»8>*61 iTEP 


-107 


5992 


LINE 'FGH-6.Yg.3>-'FGH. YB»8'-3 




3994 


NEXT FGH 




5396 


LOCATE H,N!C0L0fl 21MIWT 589 




5393 


:^/*399 




5318 


FOP BGT-9 TO c9 




3812 


NEXT BGT 




3814 


n-i 




5816 


N=INT'lj*23/ 




50tf 

9995 


PETUPN 
PEr:::::::C0L.:i::J.::::::::::: 





516 CU = *L£4['0DO- 
5£9 C2*-'L2450SO- 
538 C3l="L24LfiLfi- 
540 C4»='L24F6Ffi- 
550 C5t--L24HIHI- 
360 C6I=-L24PEPEHI- 
570 C7*=-L4800" 
588 PLftYCl**C2**C3*+C: 

535 CLS 

536 FOP BGT-8 TO 145 



:*C5**C6!-C7I 



537 I 



BGT 



_ "PEPEPEFflLfiFASl" 
595 PP1NTML EST nti INTEK..NT TPOP TflPD PO 
UP PECULEP.TO* SORT EST EHTPE HES MAINS 1 
DEJA nES FOPCES hPHEES S'OPPPETENT. TU 

ES PPIS"BIENTOT TU SUCCOHBEPfiS fl HES A 
SSfiUTS....* 
396 PPIHT- 

IL FfiUT OUE TU SfiCHES OU'fiPRES 

ftVOIP PERDU, TU SEPfiS HON VASSfiL.ET C 
E POUP L'ETEPNITE* 
i09 PPINT- 

PEGAPDE DONC UNE DERNIERE FOIS 

LE LIEU DE NOTPE DUEL ET DE TON SACPIF 
ICE...* 
685 PRINT'.. .OU TU DISPAMlTRftfl SOIT PAR 

MANQUE tEMSSILES SOIT PAP COLLISION AV 
EC UH DES AUTPES OBJETS VOLANTS* 
519 Dt=I«KEYI 
629 IF Of='- THEH 610 ELSE GOTO 625 

625 CLS 

626 SCPEEN1,0,8 
639 FOP TGB-8 TO 2 
643 FOP X=9 TO 329 
639 Y=RND«199 

669 C0UL-RND47 
679 P3ET<X,Y>,C0UL 
689 NEXT X 
699 NEXT TG8 

719 LOCATE 19,12-CQLOP 2: PPIKT'VOICI TON 
70-IBEAU'- 

720 FOR BGT=6 TO 1808 
730 NEXT BGT 

750 CLS 

300 L0AD-BS7 2',P 
TE FAIRE DEFAUT.«aI5 IL EST TROf _ -'-: 
.EIENTOT TU SUCCOMBEPfiS A HES ATTAS'JES.J 
E T'AVAIS PPEVE»(U:JE SU1S LE PLUS FOPT 

19115 PRINT-IL TE PE3TE ENCORE LE TEMPS 
DE DEUX VIESET fiLOPS TU DiSPfiPAITPAS POU 
P AVOIR OSE ME DEF ;ep • SPACE-F ■ CH"l= " I 

ALUE * 

19128 INPUT L» 
19125 GOTO 29 

19199 PEW:::::::2nde COLL : SI ON: :::::::: : 
19299 CLS:SCREEN 4,6.1 

19203 PPINT-TE VOILA A NO'JVEAU VAIKCU'TU 
HE SEMBLES PLUS LA HfiUTE'JP.LS VTCTOIP 
E ME PfiftfilT DE.JA TPOP FAC ;LE . PELEVE TOI 
POUR JOUIR DE TA DEPNIERE VIE I" 
19219 INPUT Yt 
19215 GOTO 29 

19299 REM:: :: : : :PLUS LE :e ; : :::::::::: : 
18399 CLS 

I93B3 PPINT-CELA FUT ONE JOIE POUP KOI D 
E TE VAINCPEBIEN WZ CEL* ME PAP'.' '-'.'.Il 



19306 

10319 

NT X 

13315 

18329 

16338 

18346 

16358 

19356 

19378 

18388 

18335 

19336 

18396 

13409 

•959-- 

25988 

= iiil. 

£0818 

29013 

£8015 

ON* 

289? 

26936 

c9035 

26948 



PLfiY*L!2D0L2-: : :-c4'-:_:^-.. 

INPUT M» 

PEM!::::::CHOIX D'UHE AUTRE PAJ 

CLS :ATTPB 1,1 

LOCATE 9,2:PPINT-mj7PE PAPTIE - " 

LOCATE 9,5:PRINT"G OU N" 

v8-i»CEVi 

IF v«=CHP»'79. THEN 19 

IF '/* = CHP*'73> THEN 19350 

GOTO 18370 

SCREEN 8 

END 

REM::::: ::s.ft. t>E EPUITACE: : : : : 

a ts-:.o:..n = iPE« h i :"-r. «_-."t-; 

PLAY-T3A0L3- 

FOP 1=0 TO 7 

ATTPB 1,1 

LOCATE 10,18::OLOP IIPRINT'COLL 



I PLAY *04'*Ai 
NEXT i 
ATTPB 0,i 
PETUPN 



•*t 



4 NEXT 6GT 

5 PRINT* 

KTU v£t avoir :■-■.-:; jawce '- '■ 
PEGLES BUI FEEC13SEN1 CE .E. ■ 
i PRINT- 

2itu veux tout :e: i.;-; passes - 

UX ACTES* 

7 PRINT" 



GUI 

9 M"II*C£Y« 

13 IF A*-CHRf'49. t-eh C07( -- 
U IF AI-CHPl-30 '-£<■ 308 
17 GOTO 9 

33 CLS 

34 SCREEN 0,4.9 

35 RRIKT- 

40 ATTPB 1,1 1 COLOR UPRINT* S**ACE-F 

TEP* 

59 ATTPB 9,6! COLOR BiPRlMT 1 

68 PLfiVREREREFALAFASI* 

78 : = :ht-mon hom est ;pm;e-"igh"p.- - 

ihcible, et je te lance un dcfitoseraj 

u luttep contpe mcn apmee et ce,- au 

x de ta vie?' 

80 PPINT* 

90 PPINT-SI TU ACCEFTES,Ti AURAS L'H« 

UP DE H'AFFPONTEP t>MTi --EIPACE.E - 

pepdpe .cap je suis -'Invincible 



I9i 



'-y.i 



91 CLS 

19892 PE«: ■■■■■■•- ::BPu:-A',E: :::::::::::: 

19993 GOSUB 28389 

:e03* prH ::::: ;:Mo-s^=: is ; :■__:•: : •.■=■: 

18995 IF v-i THEH 19199 

19319 IF Y=2 THEN 16333 

19915 IF r-3 Then 19308 

19899 PE«:::::::i*-« COLLISION::::::: 

I0189 CLS 

J8I95 SCPEEN 4,6,1 

:9:i3 ppint-vG'IS "■.'. : '-:z\ commense' 



TO 7 



ERRATUM sur T07 

JEREMIE LE GR1MPEUR du N 8 
SPECIAL AOUT. 
Une ligne de REM a ele coupee 
au montage, il faut taper 5 REM 
pour que le programme fonc- 
tionne normalement. EI en plus, 
comme si le programme n'etait 
pas assez long, les lignes 13999 
d. la (in ne servent a rien, elles 
proviennent d'un autre listing. 



: CLS « SCREEN 0.4,0 

£ PRINT* 

JE SUIS 'JN JEU SPATIAL, J' Al E"t 
ELA60RE Pap BS7 ET V01CI HON MENU:* 
3 FOP BGT-0 TO 1006 



[18 PPIHT-PEFLECH!S.*:\ DEST:n EST m JE 

•15 Bf-INKEYl 

116 IF 61='- THEN 115 ELSE GOTO 128 

120 PLAY-L24SID0PEFA- 

179 PLAVL12:'i:i r HPE«i:-0PE':0Fi.LnKlL«SO" 

146 CLS 

145 PPINT- 

159 PRINT-JE PENSE vUE T K DECISION EST P 

PISE" 

155 PPINT- 

168 PPINT-ALOPS INSCRIT ~0H NOM.ET s-PEPh 

RE TOI fi SUCCOMBEP.* 

J63 INPUT AI 

178 PPINT-JE VAIS TE vaINCP£.";ai 

139 FOP BGT-8 TO 555 

198 NEXT BGT 

!93 PRINT-JE VAIS TE VAINCPE.TE DETPUIPE 

263 BGT=8GT«1 

210 IF BGT-588 THEH 239 

229 GOTO 195 

230 CLS 

24 9 PLAY-MIFASI-nr^.-Ef-^L-SOPEC'O- 
256 PPIHT-- 

263 PPJNT-lu N'AURAIS PAS :■'-' T'ENGAGER D 

ANS CE COMBAT INEGAL CAP JE NE PENSE 
PAS COMME TOI T£PPIEH:JE POSSEDE UNE INT 
ELLIGENCE SUPERIEUREiC'EST c : ,,:t-r, ,--,; ,£ ; 
ERA] LE VAINOUEUR.JE VAIS D'»eo»:' TEX 
PLIOUEP LES PEGLES DU COMBAT- 
270 PRINT-- 
£80 PPINT- 

TON BUT EST DE M" AFFRONTE' JUS 
;.[J'A TF$ DEPNIEPES POSSIBILITES.CE £k m 
-HOEUVPANTTOH VAISSEAU AF1N f'EVITEP MES 
ENVOYES KAMIKAZES ET AUSSI LES ASTEPOI 
OES- 
389 PRINT- 

TU AS EH Ton POUVOIR UN Pa VON 
L'-'MINEUX CAPABLE DE DETRUIRE HE( 
AUX NAIS SON NCM6PE DE TIPS EST L1MJTE. 
'IL EST SITUE EN HAUT DE L'ECPAk » ; PO 
ITE>' 

304 PPINT- 

1\> POURRAS a :"E':"E ; I 
AL-TIP EH hB-TT-ht LES VAISSEAUX DE R*VJ 
TA!LLE«ENT.LE EOHij; ARPARAITRA SUR L'ECR 

365 C«*INK£YI 

306 IF CI-" THEH 395 ELSE 310 

319 PLAY-PEFEPEF«L"Ft;i- 
317 CLS 

313 BO/F' IS8/98>-' 158j H ■'. 

320 LOCATE 8,25:RPIHT-:::::: ::::;::: -ST 
EPOIDE ::::::::::::::: - 

329 A11--L24LmS0FAMI' 

330 fl2»«"L12t>0REI>0SIDORES . 

34 8 A3f"*L24HILI2OONIS000«IFA" 

756 PLAV HiI.A£**A3* 

JS6 CLEAR ,.3 

763 CLS 

37S tE r GPI'0'i=£40.£46, 156.255. 255. \Z~.t* 

9.249 

739 LOCATE 13.I£:C0L0P ;:PPIH' GR1 B 

793 LOCATE 6.25:C0ljP 0:PpIht-:: ;: .---' 

LE: VALEUP DE 560 POINTS :::::■ 

498 B1I='L24L»FA- 

418 62»=-L24L»S0FAPE- 

426 e3**-L12D0PED0SID0HIPEPEM- 

436 B4IMSL43PEL24D0- 

4*8 PLAY BIt*B2»*B3!*e4! 

430 DEFGPt- 1 >=248. 24;. £5i. £53-25% ; r ;t4 

S.£49 

470 CLS 

438 LOCATE I3.I2SC0L0P 5:PPINT CRt< 1 1 

308 LOCATE 8.25SC0L0P UPRINT'l 1 1 1 1 --I- 

SEAU DE PAVITAlLLEMENT ::::::• 



HEBDOGICIEL 27, rue du Gal-FOY 75008 PARIS 

VOUS POUVEZ VOUS ABONNER AU TARIF PREFERENTIEL DE 340 FRANCS POUR 52 NUMEROS AU LIEU DE 
52 x 8,00 = 416 FRANCS. ABONNEMENT POUR 6 MOIS : 180 FRANCS. 



NOM : 

PRENOM : 

ADRESSE : 

REGLEMENT JOINT : D CHEQUE □ CCP 



MATERIEL UTILISE : 
CONSOLE: 
PERIPHERIQUES : 



DEUX SUPER-CONCOURS PERMANENTS 

10000 francs de prix au MEILLEUR LOGICIEL du MOIS et un VOYAGE EN CALIFORNIE 

au meilleur logiciel du TRIMESTRE. 



Un concours de plus ! 
Rten de bien original dans cette 
formule, pourtanl nous ea- 
aayons de (aire quetque chose 
de different : nous organisons 
un concours permanent tous 
tes moit et tous les trimestres ! 
Et avec des prix dignes des pro- 
grammes que vous allez nous 

De plus, ce seront les lecteurs 
eux-memes qui voteront pour 
leurs programmes preferes sur 
la grille recapitulative men- 
suetle. 

Pas de Jury, pas de decision at 
bitraire. HEBDOGICIEL n'inter- 
venant que dans le cnoix des 
programmes qui devront etre 
ORIGINAUX et FRANCAIS. Si 
voire programme n'est pas tout 
a fait au point, un de nos spe- 
cialistes vous dira comment 
I'ameliorer pour pouvoir nous le 
proposer a nouveau. 



Pour participer, il vous suffit de 
nous envoyer vos programmes 
accompagnes du bon de parti- 
cipation ainsi que toutes les ex- 
plications necessaires a ('utili- 
sation de ce programme. 
Bonne chance! 



Reglement 

ART 1 HEBDOGICIEL organise 
de lacon mensuelle et trimes- 
trielle un concours dote de prix 
recompensanl le meilleur logi- 
ciel du mois et du tnmestre. 
ART 2 Ce concours est ouvert a 
tout auteur de logiciel quelque 
soit le materiel sur lequel il est 
realise L'envoi d'un logiciel en 
K 7 ou disquette accompagne 
d'un bon de participation de- 
coupe dans HEBDOGICIEL ou 
envoye gratuitement sur de- 



manrte par la redaction de notre 
lournal constitue facte de can- 
didature 

ART. 3 La redaction d'HEBDO- 
GICIEL se reserve le droit de 
seleclionner sur la base de la 
qualite et de Tonginalite les logi- 
ciels qui sont publies dans le 
journal 

ART 4 Ce sont les lecteurs qui. 
par leur vote, determinent les 
meilleurs logiciels mensuel et 
trimestnel. 

ART 5 Le pnx alloue pour le 
concours mensuel sera remisau 
plus tard un mois apres la clo- 
ture du concours mensuel 
ART. 6: Le prix alloue pour le 
concours trimestriel sera remis 
au plus tard un mois apres la clo- 
ture du concours trimestriel 
ART. 7: Le present reglement a 
ete depose chez Maitre Jauna- 
tre. 1 . rue des Halles 75001 Paris 
ART 8: HEBDOGICIEL se reser- 



ve le droit dmterrompre a lout 
moment le present concours en 
en avisanl les lecteurs un mois 
avant 

ART 9 La participation au con- 
cours entraine ('acceptation par 
les concurrents du present re- 
glement 



HEBDOGICIEL: 27. 

FOY- 75008 PARIS. 



je du Gal 



Sera declare gagnant le pro- 
gramme qui aura obtenu te plus 
fort pourcentage de vote par 
rapport a la totalite des pro- 
grammes recus pour un meme 
ordinateur. 

Ainsi, pas de favoritisme pour 
les ordinateurs plus puissants 
ou tres diffuses. 



RECOMMANOATIONS AUX LEC- 
TEURS QUI SOUHATTENT FA1RE 
PUBLIER UN PROGRAMME : 

• Envoyez vos supports, mode 
d'emploi, listings et bon de parti- 
cipation dans une meme enve- 
lope. 

Vous pouvez nous envoyer plu- 
steurs programmes sur un meme 
support en I'mdiquant sur votre 
Bon t)e Participation. 

• Noubliez pas et ceci est tres 
important, dinscrire sur vos sup- 
ports votre nom, le nom du pro- 
gramme et le materiel utilise. 
Notez dans les premieres lignes 
de votre programme, sous forme 
de REM, votre nom, le nom du pro- 
gramme et le materiel auquel il est 



destine Nous pourrons ainsi re- 
perer facilement les listings, une 
fois sortis de I'imprimante 

• Dupliquez plusieurs fois sur la 
cassette et a des niveaux d'enre- 
gistrement differents votre pro- 
gramme. Nous aurons plus de 
chance d arriver a le charger si les 
magnetophones ne sont pas tout 
a fait compatibles 

• En ce qui concerne les bons de 
participation, mettez votre adres- 
se complete et votre numero de 
telephone (si vous en avez un). 

• Pour tout envoi tel que "petites 
annonces". "abonnement" et 
"programmes'' specifiez sur vos 
enveloppes fobjet de votre cour- 
rier. 



• Expliquez les particulates de 
votre ordinateur et le moyen 
d'adapter votre programme a 
d'autres ordinateurs. 

• Vu le nombre important de pro- 
grammes similaires que nous re- 
cevons, evitez de nous envoyez 
les jeux suivants : BIORYTHMES. 
MASTERMIND. PENDU. TOUR DE 
HANOI. CALENDRIER, BATAILLE 
NAVALE. POKER. JACKPOT 
BOWLING. BLACK JACK, LABY- 
RINTHE. MEMORY SIMON. 421. 
OTHELLO. SOLITAIRE. LOTO. 



BON DE PARTICIPATION 



Nom 

Prenom : 

Age . Profession : 

Adresse : 

N- 1 telephone : 

Nom du programme ; 

Nom du materiel utilise : 

declare etre I'auteur de ce programme qui n'est m une imitation ni une 
copie dun programme existant Ce programme reste ma propnete et 
j'autorise HEBDOGICIEL a le pubJier. La remuneration pour les pages 
publiees sera de 1000 francs par page (un programme n'occupant pas 
une page entiere sera remunere au prorata de la surface occupee) 

Signature obligatoire : 

(signature des parents pour les mmeurs). 

Le programme doit etre expedie sur support magnetique (cassette ou 
disquette) accompagne dun descri p tif detaille du m atenel utilise. 
dune notice d'utilisation du prog ramme - Les supports des program- 
mes publies sont conse rves, n'oubfiez done pas den faire une copie 



LA REGLE A CALCUL RE- 
COMPENSE LES MEILLEURS 
LOGICIELS EN OFFRANT A 
CHACUN DES PREMIERS 
DANS LEUR CATEGORIE UN 
OUVRAGE A CHOISIR DANS 
SON RAYON LIBRAIRIE (EDI- 
TEURS : BORDAS, DUNOD, 
EYROLLES, MASSON, NA- 
THAN, PSI, SHIFT, SYBEX). 



SOUtRELLE RECOMPENSE LE 
MEILLEUR LOGICIEL DU MOIS 
PAR 2 CASSETTES A CHOISIR 
DANS SA LOGITHEOUE. 



Les editions du CAGIRE offrent 
au meilleur logiciel du mois sur 
HP 41, leur livre "au lour oe la bou- 
cle" de Janick TAILLANDIER. 



RECOMMANDATIONS 

PARTICULIERES 

AUX POSSESSEURS DE 

TRS80 

Indtquer avec precision le mo- 
dele d 'ordinateur auquel le pro- 
gramme est destine. Si le pro- 
gramme est enregistre sur 
cassettes utilisez obJigatoire- 
ment la vitesse de 500 bands, 
meme sur un modele Ml. 
Dans tous les cas ou le pro- 
gramme est enregislro sur cas- 
sette il faut avoir utilise la vi- 
tesse de 500 bands et non. en 
particulier, la vitesse de 1500 
bands du modele III. 



UTILFORMES 



Ce programme est un utilitaire de creation et de mani- 
pulation de formes pour PC 1500. II reprend certaines 
options d'ordinateurs plus gros, ramenees aux dimen- 
sions, somme toute modestes, de I'afficheur de notre 
veneree becane. 

Herve POMMIER 

Les touches 1 a 9 sont les commandes de direction. 
5 :Commande deux modes d'etat du curseur (point clignotant a I'affi- 
chage) grace 3 la bascule de la ligne 40: une pression Fait passer 
du mode ecriture au mode neutre et reciproquement. Une pre- 
miere pression du 5 fait de plus sortir du mode effacemenl (lou- 
che 0) par retour au mode neutre. 
rcommande le passage au mode effacement. 
Les parentheses, touches ) et (, permettent de deplacer le curseur 
de 8 colonnes en 8 cotonnes (quantum modifiable lignes 410 A 420) 
le passage en mode neutre est automatique. 
. et + sont les deux touches d'analyse qui permettent d'obtenir le 
codage hexadecimal de loute forme presente a I'affichage (pour les 
codes, voir C). 

+ : analyse de tout I'afficheur. 

.: r>e permet d'analyser qu'une partie de ce qui se Irouve a I'affi- 
chage. posrtionner a I'aide de ) et ( et des touches numeriques, le 
curseur sur la colonne figurant a I'extremite gauche (incluse) de la 
zone a analyser, appuyer sur . (un signal sonore signale laccepta- 
tion de la commande). Repeter r operation avec la colonne figurant a 
I'extremite droite: un second appui sur . provoque I'analyse de la 
zone ainsi delimitee qui va reapparaitre seule a I'affichage. 
' est une louche qui vous permettra apres analyse, de multiplier le 
nombre de (ots precise par I'appui (apres ' ) d'une louche numeri- 
que ou alphabetique, la forme analysee en dernier. 
- Vous permettra, seion le meme principe que * de passer en video 
inverse une longueur d'afficheur modulo la longueur de demiere 
forme analysee. 

/ est la louche de selection des differentes options: une pression et 
I'indicateur DEF s'allume grace a I'astuce POKE de la ligne 5 qui 
fait passer en mode DEF et reserve I. 
Les options accessible^ sont les suivantes: 
A: initialisation totale (ecran et variables effaces). 
B: initialisation partielle (remise a des variables mais conservation 
de I'ecran). 

L'option 3 est particulieremenl utile si Ion veut travailler sur des let- 
tres ou sur une forme predefinie: il suffit de taper les lettres au cla- 
vier ou de faire apparaltre la forme en tapant (on mode direct) 67 

" "ENTER, puis de lancer le programme par DEF B (DEF ne mo- 

dilie pas I'affichage contreirement a RUN). 

V: reaffiche la derniere forme analysee (a condition de ne pas avoir 
entre temps utilise A ou B). A utiliser apres appui accidonlol ou non 
motive sur /, ou pour reprendre un travail inlerrompu (BREAK puis 
OFF) relancer le programme par DEFV). 

C: permet d'afficher par groupe de 8, les codes hexadecimaux do la 
demiere forme analysee (la succession se fait par ENTER). 
F et L: a utltlser apres avoir analyse la forme a manipuler (obliga- 
toire), vous permettront de retourner celle-ci de deux facons (ellos 
agissent directement sur les codes, pas besoin de reanalyser). 



F: retoume la forme frontalement (F) sur elle-meme (V deviendra"). 
L: retoume la forme lateralement (L) sur elle-meme ( >deviendra < 

H enfin. est une option HARD COPY (H) qui imprimera la forme (en 

long) et ses codes en hexadecimal, permettant ainsi de se consti- 

tuer un 'catalogue" de formes. 

Un dernier mot: le programme ne tient pas compte de la premiere 

colonne, a gauche, pensez done a taper un caractere "tampon" 

avant les lettres a manipuler ou 00 au debut de tout GPRINT avant 

de faire DEF B. Une fois lanoe le probleme disparait puisque vous 

ne pouvez acceder a cette colonne. 

Ce programme est ouvert, mais pour tout faire tenir en 1845 octets, 




\jtj ^iiuyiar>">>*3 cat UU1D 

il a fallu tasser: je vous 


i, niciia \/iiai iuui i <n i r e,- itiiiri 

conseille done, pour mieux 


comprendre sa 


298 


R£n nuLiin un 


680 


GOTO Mi 


structure, d'analyser la 
gramme. 


ligne 


10, veritable centre 


de iri du pro- 


308 


rjON: * 
BEEP l-i fiSI 


•'i "nil C 1 :()N 
i RROR GOTO 628 










INKCYt 18: IF 


610 


FOR F=IT0 K:^<» 












i ( [GOTO 300 




■■'■:i 01 ... 1 l N 


5:BEEP 3:°0KE t? 


18 


rj = (Q^0J + (D-2J = 


'16>=0LET B*R/ 


301 


IF i >155/m I i 




e*(F)-nn i 


84E, 192:W0IT : 




BEEP 3: RETURN 


16 




L-lNl (] 33/(1) 




STEP -?:%t xt- 


GCURSOR 0: 


50 


GPRINT P0R H; : 


83:G0SU8 30:8-0-1 


385 


CLS ! GCURSOR I 




mot ceitF), b, 


GPRINT 




GCURSOR C: 


6*INI D:G0SUB 




■MOl 1 BsFOR L 




2):NEXT ',:«*(! 


8:"A"CLS 




GPRINT POINT C 


90 




i TO L:Hi"I 1' 1 . i" 




i=X*:NEXT F 


9:"B"BEEP ]: 




-H; :GCURS0R C: 


85:NEXT E:NEKT F 




:F0R F-=J TO K: 


620 


i OR I 1 10 INI 


CLEAR iOliH"] 




GOTO 53*7»0 


86: IF RIGHT* '.Ml' 




GF'RINI ijif.l- .) j : 




' .3-*K'2):x* >*t 


:O-|:2S-'01234 


53 


GPRINT POP H: 


K), 2J-"09"[.l 1 




NEXT FtNEXl i ■ 




CF>:8*(F)«S*(K 


567890BCDEF 




RETURN 


e*<K)=LEFU (0 




RETURN 




-F'l):mo:i • i 


]0:WOJ 1 5:0N OSC 


55 


GPRINT Pj: 


«<K),LEN 9*tK> 


390 


p[.n SNflLYSE Pn 




■ X*tNEXl Fl 


INKEY* -39 




RETURN 


2J:G0T0 86 




'■•1 IE1 LE: . 




GOTO hi, 


GOSUB 410,420, 


60 


0=2:GCURSOR C: 


87:G0T0 100 


400 


lit i P 3: IF R-0 


700 


"F"F0R F--1 Hi K 


300, 70, 3, 203, 1 




IF P=<P0R H) 


90:9*CF)-ai(F)* 




LET R=C: RETURN 




:Ui=a*<r>:a»<F 


00,5,60, 29, 15, 




GPRINT P-H: 


HID* (24, MINT 


405 


GOTO 70 




) .""|| OR i .'in 


31, 18, 40, 70, 33 




GCURSOR C: 


B, O: RETT URN 


108 


REH CURSf-UR t 




i i N iumi I' ;- •: 


, 22, 35 




GPRINT P: 


95:"C"CLS :F0R F= 




) 




i.-nio* (Ui, i , i 


1 1 : GCURSOR C:P= 




GCURSOR C: 


1T0 K:BEEP 1: 


410 


naJ;C*C-8*(C>6 




>:Y**niO* <Ut, 


POINT C: GOSUB 




GPRINT P-H: 


PRINT 9*<F): 




): RETURN 




E-Ii 1) 


S8*18*<D-2): 




RETURN 


NEXT F 


420 


C+8*CC( 1 


-M8 


■ p ■■■■ X*>37 


GOTO 10 


£31 


0«l: GOSUB 50:0 


100:"U"UniT 0:CLS 




48>:RI IURN 




LET B ftSC X* 6 


l3:REf1 HUI T DIREC 




-?:Rf TURN 


[GCURSOR l: FOR 


500 


'H"BEEP ItTEXl 




B '■n;. 


TJONS 


08 


REH CfiLCUL DU 


i ! in K:GPRIN1 




rCSJZE UFOF i 




G0SU8 9818 'UAI 


]'i:M-:||*MtCH<6t>: 




F10X DE UflRB NE 


84(Fj; :BEEP 1. 




■ I TO KiLCURSOR 




Y*(G0SUS '40: 9 


iJfll I H:kh FURN 




CESSPIRES 


^rNEXT l:li l:(l 




3:LPRINT 8i(F ) 




■,).nri,r):,iiH 901 


18:C«C-(OJ):W)IT 


78 


BEEP 3iUfl] 1 . 


ri'cr R-n+]>»c 




;nfxI f :il -K 




goto ?m 


0: RE TURN 




"OF 1 'J! 


R>0j:R=0:GOTO 






■■/M 


fl-UPL X*-8*i 


2e:OC+CC< i ■■'..': 




STEP -IMF 


10 


3J3 


GRAPH : 




ii,i X*>7>: 


tffil 1 0:RETURN 




POINT l >eNEXT 


198:REM UIDEO INUT 




i.t CURSOR '.in, ii 




GOSUB 740! 


77: Mil IV2*CH>I )i 




p 


RSC: - 




):S0RGN :f OR I 




OOSUB 90:8 UAI 


Jni 1 HiREIURN 


75 


INT (n/B 


200: BEEP JtL-OSC 




■ 1 TO Mil -roiNi 




Yi:G0SUB 740:B 


29H30SUB 1^: GOSUB 




):K-K*<cn/8-Kj 


INKEY* 481 1) 




1 . II 1 0NEXI I 




B*8*<UA 


18: RETURN 




<>2) 


i ( I80T0 280 




:i,lllll 3 18 




u GOSUB 18 


IltGOSUB : 


78 


K'i [i i (\\ i tn [ii :, 


210:1 -i rn: II i >J3S 


528 


FOR J*0TI 


?-iPl 


mi xi EiNI 


7H:HI TURN 




■■ nnr:. 


OR L^Hl 1 , 




7"J: IF 7AN0 I 




GOTO BO 


33JG0SUB 22iG0SUB 


80 


TOR F- I 10 K:ui 


5 




if t-4?J 


?m 


■ ' i 


18: RL TURN 




CF) :l OR i 


?20: UA] i 0: ni EP II 




, -4*1 >IR| INI 




■ B ■ 


3Si GOSUB /■>■■ SOSUB 




7T0 0:O"B»F*F: 


' 1 TO i: 




(.8,3) ■: 




RETURN 


73: RETURN 




IF A<RnR fl>C*( 


GCURSOR i ■ 




3,0)-CH, 


■ ,s 


■ ■ ■ 


37:REf1 Bn-.i 




R>0>*n*<.R-0; 


GPRIN1 127 




, 3> 




■ 


UTRE/TRPCF./II F 




r,i,m :r, 


POINT 1 : !N| XI 


323 


NEX1 J:NFXI 1 




■ ■ n 


RCE 


87 


<\ point n: II fi 


K: RETURN 


338 


TEXT :LF 2: 







CrWPUMR! 


lode Runner 

■ 

• 


;==6rodatund_ 





REVENDEURS 
NOUS POUVONS VOUS 
FOURNIR TOUS LES LOG!- 
C1ELS DE CETTE PAGE A 
TARIF PREFERENTIEU N'HE- 
SITE2 PAS A NOUS CONTAC- 
TERAU:16(1) 2W.2S.50. 




DEMANDEZ LE PROGRAMME 

Achetez vos logiciels les yeux fermes, nous les avons testes pour 




BOS W C.OMUAMOt AOTCWtnOOMCCW*": 
SHif T COITIONS, 37. ru* du OM For 7W0* MA* 


IOOKXL8 




r... 


o. 


m.™w 


















« 1>0C 


. , -„..„,*« 
















HM 



DEMONIAK 



DEMONIAK esl un jeu dans lequol te joueur est un 
pauvre personnage enterme dans un labyrinlhe avec 
des monstres a ses (rousses. Comme dans les classi- 
ques de ce genre, le but est de manger le plus de 
pieces possible sans se (aire attraper par un fantdme. 
Cependant, le deroulement du jeu est different des 
divers PAC MAN et autres MUNCH MAN.. .En effef, le 
joueur ne dispose pas de super pastilles pour manger 
les monstres, par contre tous les 300 points, les fantd- 
mes entrent dans leur cycle de reproduction et sont 
alors vulnerables pendant quelques instants. A la fin de 
ce cycle. 4 nouveaux fantdmes naissent et le joueur 
passe au niveau superieur. 

Lorsque le joueur a reussi a attraper 10 fantdmes, il a 
droit a une vie supplementaire. La moitie des fantdmes 
ramasse des pieces et I'autre moitie en seme, ce qui 
fait que le tableau ne peut pas s'epuiser car il y a tou- 
jours de nouvelles pieces. 



M 



Benoit GABORIT 



Mode d'emploi inclus dans le programme. 

PS: Pour sortir vivanl du labyrinthe. il faut arriver I 

pieces. Bon enlramement. 




SPECTRUM 



9 GO 5UO 8500 

10 go sua ?aae 

20 go sub 9300 

30 PRINT AT y,x, INK 2; "C" 
40 PRINT ■!;" priitit un 
t lOuCht "; PAUSE 9: PRINT 
81, AT !»•;"„ 

so go to 1000 



IIS LET bl«d«: RETURN 
130 IF RTTR ly*l,XJ <>3 THEN LET 
9-V*l. 00 TO 190 
130 LET bt-dl: RETURN 
140 IF RTTR ly-l,X) l>3 THEN LET 
■-1: GO TO lo~ 
— ba- 
a—3 



ISO LET b|«<J«: RETURN 

180 IF RTTR (u.x+1) <>3 THEN LET 

go to lea 



170 LET 

iao LET a 
190 XF ST 



RETURN 
) -7 THEN RETURN 



890 RETURN 
380 IF RTTR lu (aJ -1, 
N LET rto; -Z«tz> : LE" 



aee beep .007,0 

3.10 LET pl»Ot+l: PRINT RT a, 8; 
INK 4, BRIQHT l,"scort : ";pt 

330 IF ATTR ly,x)-71 THEN GO TO 

5000-300* (FM-i) 

340 IF Pt/300-INT CPt/300) THEN 

LET s.0 PRINT n\; PAPER 1, RT 
.«, 'iai uncani joni «n train d 
fl s« rtproduir* 

": LET tm*\ 

330 IF_Pt»1300 THEN GO TO 3000 

*.j- (a) ( «3 THE 
. LET z-Z+1: RE 
TUfiN 

510 LET 'j (a) >v («> -1 

340 RETURN 

300 IF RTTR (<J (») *1,X (4) ) -3 THE 
N LET fllll.UIZI LET Z-X*l; RE 
TURN 

310 LET u (a) ■«. (•) +1 

340 RETURN 

700 IF RTTR (y (•) ,X (*) -1) -3 THE 
N LET ri(l)*I|(Z): LET Z»Z*1: RE 
TURN 

710 LET X («) .X (4) -1 

740 RETURN 

300 IF RTTR <'j (a) ,x (a) *1) -3 THE 
N LET f «(a) ■za.CZ) : LET Z-Z + 1; RE 
TURN 

310 LET x (a) •/ (a) + 1 

840 RETURN 
1090 LET Ct-INKEYt 
1903 LET i-» + l 

1910 IF CODE C»>53 AND CODE C|<3 
7 THEN LET dt-bf: LET b«-CI 
1018 IF RTTR [y.xJ-71 THEN 00 TO 

3000-300* IFM-I) 
1930 IF bio"" THEN PRINT RT V.X 
,■' ": GO SUB 304CODE ba-9S0: PRI 
NT RT y ,x, INK 3; "C" 
1025 IF f»-l THEN IF s>80 THEN L 
ET n-n.I. 00 SUB 9500 : GO TO 30 
1039 TOR 4-1 TO ft 
1949 print rt y (a ) , x (a j ; " - 
1030 PRINT RT 36-y (a) ,30-x (a) ; I 
NK B; •'0" 

1069 PRINT PT x (a) -a,2B-u (a) ; IN 
K 6,"B" 

1070 print rt 2B-x (a) ,g (ai *a; " ■ 
1930 next a 
1100 FOR a-1 TO I 



2010 PRINT RT 10,13; FLASH 1; "BR 
RVO I " 

2039 PRINT '"'Uous ttti rtsftorti 
vivani du ia — byrinlht avtc 150 
LOUis d'or. Uotr* forlun* ill 
tvc a I500939OVOUS alas '. rop for 
t.iaitsez un pau lis autras jou 

2030 for a-e to aee: border 0: o 

ORDER 7: BORDER 1: BORDER 6: BEE 
P .01,30: BORDER 2: BORDER 6: 80 
RDER 3: BORDER .4: NEXT a 

2049 LET p\ .3909 

2050 00 TO 6000 
4500 LET fa-fa+l 
4310 BEEP .3,-80 

4320 PRINT AT S.fj-lj INK 3; "0" 
4530 LET x»14; LET y-12 
4340 IF ra»12 THEN LET vi««Vit+l 
: BEEP .3,0: BEEP .4,15: BEEP .5 
,30: PRINT RT 2,0, FLRSH l;"eONU 
SIM "':■ TOR 4-0 TO 3: FOR b- 
TO 30: BEEP .91, b: NEXT b: NEX 
T a: LET fa»0: LET n-n+1: 00 SUB 

9309: IF fl»6 THEN LET n -5 
4690 GO TO 1000 

5009 FOR a-0 TO 10 

5010 BEEP .02, a 
5020 BEEP .07,-30 
5030 BEER .07,-10 
5040 BEEP .07,-20 
5050 NEXT a 

5060 PRINT AT 0,0; 

3070 FOR 4*0 TO 95 

5039 PRINT ■' "J 

5090 NEXT a 

5109 LET via»via-l 

5119 IF vi«-0 THEN GO TO 8500 

3120 PRINT AT , 0; "Rh ! Ah I | Uous 

vous atas rail croquar." 

3130 PRINT "Hiurtutmnt , ii vo 

us rtsta an core ";vit;" via"; 

"i" and via <>l; ") •' 

5140 FOR a-0 TO 800: NEXT a 

8199 SO SUB 9800 

3309 00 TO 30 

6009 BORDER 1: PAPER 1: INK 6: C 

L3 



6030 FOR 4-1 TO 10 

6939 IF Pt>hla) THEN GO TO 6080 

6940 NEXT a 

5959 TOR i-10 TO a STEP -1 

6058 IF |»i THEN 00 TO 6080 

6960 LET ntin -hili -1) 

6068 LET h til -h ii-1) 

6070 NEXT 1 

6080 PRINT AT 8,0, ,- UOTRE SCORE E 

ST DE "JPt;" POINTS. U0U3 AUEZ 



1139 00 SUB 300*190*CODE ra(al 

1140 PRINT RT y(8),X(ai; BRIGHT 
1; "D" 

1150 PRINT RT 26-u !ai ,30-x la) , B 

RIGHT 1,-D- 

1160 PRINT RT x (4) -3,3S-<j (a) , SR 

IQHT 1 "D" 

1170 PRINT AT 28-X la) ,y <4) +2, BR 

IGHT l;"D" 

1189 IF z>93 THEN LET z-1 

1199 NEXT a 

1300 00 TO 1090 

2909 PAPER 9 INK 6: 80RDEA 0: C 

LS 



POINTS. 

LE "jar'a SCORE" 
5090 INPUT "UOTRE NOH "iHIIII 
6093 LET h la) »Pt 
6100 CLS 

6103 PRINT AT 0,10; FLASH Lj* "CIA 
SSEHENT" 
5110 FOR 4»1 TO 10 

6120 PRINT -a;" ••;h»(a)," 

. . . . " ; h ( a ) 

6130 NEXT 4 

3140 PAUSE 3000 

6150 00 TO 19 

6999 STOP 

7«a9 PEH Prtiantation 

7010 

7030 PAPER 0: INK 6: FLASH 9: BO 

PDER 0: CLS 

7830 FOR »>0 TO 100 STEP 4 

7040 PLOT 127,0 DRAU INK 4,-4,8 



7079 PLOT 128,178: DRAU INK 4; a , 



fw0 PRINT RT 4,8. FLASH 1,'OEHO 

NIRK",AT 4,34, ■&EHONIAK", AT 16.0 
, " DEMON IOK",P.T 16,34, "DEHONIRK^ 
7120 FOR a-0 TO 3 
7130 BEEP .3, -10 
7140 PAUSE 5 
7 180 NEXT 4 

7169 BEEP .6,80 

7170 FOR 4-6 TO 15 STEP 3 

71.89 PRINT AT 4,14, BRIGHT 1; IN 
K a;'-PE"; INK 3,-'UR'- 
7199 BEEP .2, -40: BEEP .3,-20 
7300 NEXT 4 

7319 PRINT HI, AT 0,0, INK 0, PAP 
ER 3, "PARUIENDREZ UOUS A UAINCRE 
LES E3PRIT3 MRUUAIS OU LABVRIN 
THE 77" 

7229 PPU3E 400 

7230 CLS : PRINT AT , 13, "DEHONI 



Z*»CHRt INT (f*N0*4> 



AK" 



l« 



7860 PRINT '" Fata • tux.vou*. n' 
avaz d'aulra r* court que la (uit 

a.Capandant ,voui dtvai imiir d 
a racuparcr la plu* grand noabr 
'" dipi«cei -i or l en to 

tion , par 'on 

L«» 'anio*ciie dadoubianl it da 
viannant vui--ntrablts quaiquts 
instants , profittz-«n ! I i " 
7380 print '"Pour s< dapiacar , 



i ■> 'i i- 



las 4 



has" 

pcrsonnaga 



91111 



.0111100 
01111110 

llllllli 
11011011 
llllllli 
llllllli 

10101010 



8000 REH 

8010 

8020 DATA BIN 0003000a 

8030 DRTA BIN 00111090 

8040 DATA BIN 90111000 

6080 DATA BIN — 

8060 DATA BIN 

8070 DATA BIN 

9080 DATA BIN 

3090 DRTA BIN 

8095 

8190 DATA BIN 

8110 DATA BIN 

8120 DATA BIN 

8130 DATA BIN 

8140 DATA BIN 

8180 DATA BIN 

8160 DATA BIN 

6170 DATA BIN 

8178 RESTORE 

8160 FOR 4-0 TO 15 

8190 RERD b 

8390 POKE USR "c"+a 

8319 NEXT a 

3229 LET Vie-3 

8330 LET fa-0 

324-9 INPUT "NiVtau 

8389 IF n <1 OR n>5 

HEN GO TO 8243 

8269 GO TO 9900 

8500 DIM ht(ie,10) 

8519 DIM h 11U! 

8339 TOR 4-1 TO 10 
8530 LET ht(4) -■'•SPECTRUH*" 

8340 LET hla) 

8559 NEXT a 
8900 RETURN 
9900 LET ." * 

9019 LET 
A" 

9020 LET a«»aa>"RBflRABABABABAAAB 
fl" 

9030 LET al-a«»"RBABB8BBBBAB8BAB 

fl" 

9040 LET a*>at+ 

fl" 

9050 LET as-a«+ 

R" 

9060 LET aS-att"ABRAABABABRBR8AA 



.100+50* 



ABABRARARBARABAB 
ABB8ABBBABBBRBBB 



ABB8BBBB8BBBR8BB 
ABABRAABABAAR8RB 



9070 LET a*aas+ 

fl" 

9080 LET *t*as+ 

fl" 

9090 LET l<-aa+"ABB6flBBBBBBeBBBB 
fl" 

9109 LET at«al*"RAABABRBRBA8AAAB 
ft" 

9110 LET aafaS+"AB8BR8B8ABBBABBB 
fl" 

9120 LET ||U| + "ABABRARBRRAAABAB 

A" 

9130 LET at-att-ABABBSABBBBBBeOB 

A" 

9140 LET at-at + '-ABRRABABABABAAAB 

A" 

9150 LET aa-4l*-"A8BBBBBBBBABBB8B 

fl" 

9160 LET a|«aO"AARRARAAAAAAAAAA 

fl" 

9170 LET pt«0 

9180 REH tur 

9190 

9200 DATA BII 



91111119 
91111119 
01111119 
01111110 
01111110 



92a0 DATA 61 

9330 DATA BI 

9340 DATA BI 

9330 DATA BII. _. 

9360 DRTA BIN 01111110 

9370 DATA BIN 00000B00 

9330 

9290 REH Piece 

9300 

9310 DATA BIN 90900909 

9329 DATA BIN 90090009 

9339 DATA BIN 00111100 

9340 ORTR BIN 00111100 



9379 DATA BIN 99990900 

9380 DRTA BIN 00000000 
9390 

9400 FOR a a0 TO IB 

9410 READ b 

9420 POKE USR "a"+a,b 

9430 NEXT a 

9430 RETURN 

9500 INK 3: FLASH 0: BRIGHT 0: P 

APER 0: OUER 0: INVERSE 0: BORDE 

R 0: CLS 

9310 PRINT AT 4,0 

9520 FOR a-0 TO 272 STEP 17 

9539 PRINT TAB 7j 

9540 FOR b-1 TO 17 

9550 IF CODE 4»(atb)-144 THEN PR 
INT jflJtbl ; 

9560 IP CODE 
INT INI' " 



•146 TH 



9379 NEXT b 
9589 PRINT 
9890 NEXT a 
9600 INK, 7 
9610 LET za-" 
9630 FOR 4-0 



TO 8) 



sill 



3039 LET Il-M.i 
3849 NgXT a 

mi let rt-z*< 

9559 LET -" 
9570 DIM 
9680 DIM 
9599 LET 
9709 LET 
9719 LET 
9739 LET 

9739 LET ; 

9740 LET U 131 -6 
9730 LET x (4) *2a 
9735 LET X IS) -33 
9760 LET v (4) -39 
9765 LET y IS) -30 

9789 LET X-14: LET 'j • 1 3 

9799 LET b»«"" 

9900 LET Urn-" 

9810 FOR a-1 TO via 

9830 PRINT AT 0,33-*, BRIGHT 1, 

INK 2, FLASH 1,"C" 

9930 BEEP .2, -20 

9S40 NEXT S 

9950 PRINT AT 0,23,"vi«S:" 

9870 LET fa-0 

9980 PRINT RT 1,10, INK 0, PRPER 

i, "Niveau :";n 
9890 LET S-0 
9910 IF ra <>0 THEN FOR 
: PRINT AT 2, a, INK 3,* 



a»l TO 





■■■■■ ■■■»■ 

■'■■■■■■■■■■■•■■I 

{■■■■■■"■■■■■■■■I 
□ BanaQaaaBaaall 

■ ■ IIKIHIKM 

S% ••■■»•"•»■■■■ 
■■■>■■■■■-■■■>■ 

Ilium ilniiil 
■»■■■■■■■■»■■■ 



-Fl 

■•■■ 



■ t l 

I»»i ■•■•■ ■■ 
■■■■§■■■■■ .i 
■■■■■■■■•■■■■■•I 
I ■■«■■■ ■■■■■a ■■ 
••■■•■ ■'■■!•■■■ 
■■ ■■■■■■■■■■■ ■ 
•■ ■■■ ■•■■■•■ ■ 

RhlflhM Uous vous tits r»it 
cro*»utr . 

Hturt uscntnt , i I vous rute 
• ncor« l vi« I 

■■■■■■■■■■■■■•■I 



•■■■■■■■■i ■■■ 

•III ■ ■■■ ■•■■ 
•• a • a ••■ 

U III •■■■■•■• 

■ ■■•■•■•■■■ 

!!.[ "j:!:r 
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-■W.2 r-PAHft. -?5- 1 ■[■PAW-28,13, 1 
3e43'5 CUR8ETX+3,V*10, 1 DPAW0.10-I ^D 

t-TtUli.l.i.1 .1 r-PHHfi.-in.t l*RH-|«,ft,i 

9457 CURStTT»*19,Y+2S.i r.pflue.ie,] ■ 
DPAH5.0 1 [>PFiMfl. !<).] DPftM5.e,l 

«MS9 DPftMB.-lS-l'DWU-S/fl-l r-PAMfl. 
-5,1 

1.4. 1 ,( 



S/fl I 



30427 DPflMe [0, 1 [Htn 
-n.l ,;, F0rei"»T02 

041 i ■ ■■ ■ ' ■■ "i--Tr:.v. i PWM9.43 1 
rt-Rit,-" i' i DRRU9 K'.i WWH-t3.0,l 

^•^'. r.'PAHfi -;;■=,.] [.pfiW-5.0.1 

48437 MEXTBI 

0440 - ■ ■ l« ■ | T ■ v I PPAU0.43. 1 

■ ■ ' r.jL-.-..|i. ULi r.f'MW-IS.e.l 
)«442 WtftMB -18 r pRflUS.e.l OPAMe.^ 
■ : WWwe ■!'. i WWM-19-9- 



30465 PRIKT'Voila i- 4u*stIot). 

'iVAf,? PPIIIT- ■] 

30484 CUPSET88.196,J CURSET8Q, 197, 1 
CURSET87. I9R-1 
0499 RETURN 

?i«wi pPinrrHPv t2 > 

31015 PRIHTCHP*X4 iCHP*"?? >•» 

■rtf-- KIJ I ER"CHR*X4 ■ 
J1017 PRINT PRINT 

31020 PRINT-' 'Tnt'v;v7 .-r-vcirji EZ-VCirjS 
RVOIR DES EXPI \- HI I0H9 
J1030 CeTREO IFPE«""»)-THEN31258 
1\mz IFPEOO"o"THEN31038 
3J035 PRINT* " CHR«27)j"fiNw :■■ 

I ■ ■■ ..■!■ ,,-T,,-. 

J1040 PRINT" -rupsr;.,' ij"F*fluoi eh »1 



ii nnpMfli. ■? 

31030 FRIMT PRINT"mi9 LoTMua !•• 
ihnondes WURB8 fJ-r:i'»nt d* coP 

,rr ,-,.-,- bum* "i 

310SO PRINT**acrrtM,11 faut rtaOlr 

(1070 PRINT PRINT " "CMRKZ7>"0V 
oicl lt>l ■■■''■' ""!■ ■'• i I j - lbl«l 
31075 TP1MT 
tioro PRINT" tmpv?;' ■■■r. i r-„ PUcha 

HO90 PRINT" 'THP«'27)"D lndi<tu«nt 
l -,- ndrolt ou l« ranoti •.* 
31100 PRINT" "CHR«27>"0 cowc«ntr#r 

71105 PRINT" "CHP«'27>"0-L« b#rr« d 
••sPac-wnt dtclindW 1-" PRINT" "CM 
R«f27)i 

31107 PPIHr-D tir 

3111" PPIIIT" "CHP»<-27>"P--X' .cjrsau 
r *n h^ijt-, , •gfi.ich* 

31129 PP1NT" "CHRfC27>"D-'C CWtft 
r *n haut * droit* 

31130 PPINT" ■CNRjKZ7>"D-',''CUI-itU 
r en b"S a twito* 

71135 PRINT" • , CHP«'27)"D-'-'' <curs«u 

12 



f en b»s » droit* 

3114Pt PRINT" "CHPV 27 )'!>-' B' 'C'ir-et. 
r mi CtTttrt dfl I'-cran" PRINT 

31145 [F KEYS' >""THEH31 143 

31159 PPIIITCHP«'27' ,, ';"CHPS'27) M C'-rH 
Rt<27V'L mPPUYEZ 8UR UIIE TOurn 
E"i 

31 135 CETZZ* 

31160 CLO' INK1 

31179 PPIIIT" [ t- i-,-.t ,,n.,. .|-.- Fl up 

I", .--i .I-- rr,.-.i •-.'!,■ ,i'i, ,-, ,,.-. ■ i.. 

A*s d* rtAR'^" 
3ll?0 PPIifT PRINT'Pour uttf/lndra c* 
but. das va.isr.fjmx esPiona "ont"^ 
3U0I PPIHT" turvolar re* base* 
31163 PPIHT'PPtttT" "CHR«K27>"CL<n ■ 

".-"frill'-- COAPttTlt 2"> IVionaj 
31110 ppiiiT" "CHRtX27)"C»l ■-■"■■ M 

dftfulsar Pai ■■•^r 
31113 PPINT" "CHRfK27>"C« i idrill* 

eomplvtf. iv»e 43 "ii»»lla»*j 
71200 PPIIIT" "TUPS' .-';■ ."i.|. ■ .l,,t.v 
■' ■ ■ i'V I (■■un- "i up*. 

")"e«na«l" 
31213 PRINT- "CHRt/27)"C0am 1- c*j 

coritr»lr». les Photos 



31213 PRINT" 'CHRJK27>"C»nT<1 8>*rwl 

J1220 ppiiit" a CHRfK27>"CX*t voul *« 
ItVtnt des Points) 

31223 PRINT 

31230 PRINT" "CHP»(27)-D"CHR«':27>"S 
ATTENTION IN "CHR»'27>"P 

31233 PRINT" "CHR«<27)-DSt le r.o«br 
■ de Photos d*P*sse 23, 

31240 PRINT" *CHMK27>"D1*S SPU.WBS 

Perceront le sastene de 

31243 PRINT" "CHPS<27>"0defense des 

bases et les detnjlront 

3124? PRINT PRINT 

31230 IFKEYt<>""THEN31230 

31233 PRIHT-Entraz -ulntentnt I* t* 
mPs de Pose lndlsPens»ble entrn f) 

auw Photos ' 

31260 INPLiT-TewPs ' de 10 I LeO)"jRU 

31263 IFPLK!iwjPPU^lROTHEN31260 

31267 PRINT 

71 270 PRINTCHRS' 27 )"S"CHR« 27 >"0"CM 
»*<27>"L RPPUYE2 SUR UNE TOUCH 
E"i 

31273 CET2Z«'RETl)RN 



DEDALE 



II faut arriver a sortir du labyrinlhe. donl vous aurez 
une vision a6rienne au d6but du jeu. Tout le reste se 
d6roule en 3 dimensions. 

Pierre Guillaume RAVERDY 

Les touches E.S.D.X du davier vous serviront a vous deplacer (ce 
qui mettra votte sens de lorientalion a rude epreuve). 
La direction que vous suivez est iodiquee en haul a gauche de 
t'ecran, ainsi que voire position en X et Y. plus voire X est grand 
plus vous vous approchez de la sortie... 



10 CALL CLEAR 

TO FOR X-5 TO 7 

30 CALL COLOR<X.1A,2> 

40 NEXT X 

SO CALL SCRE£N<2) 

AO CALL COLOR(13.7,2> 

7D CALL CHAR<12B,-FF") 

BO CALL CHA*m29,-OOOOOOOOOOOOOOFF ,, > 

90 CALL CHAR { I 30, -0303030303030303"! 

lOO CALL CMAftU3l.-COCOCOCOCOCOCOC-'> 

HO CALL CMARt 132, "010204091020408-1 

120 CALL CHAR(133,-804020100B040201"; 

ISO CALL COLORC14,4,4> 

140 CALL C0L0ftH5.ll.UI 

130 CALL COLORC 16. «>,(■> 

160 CALL CMAR(13*..""I 

170 CALL CHAR(132."-> 

ISO p-eo 

190 DIM C(22.30) 

200 FDR J-3 TO 22 

2lO FOR 1-3 TO 2B 

220 RANDOMIZE 

230 X-INT<ftND»100)»l 

240 IF X-:P T)CN S30 

2SO A-132 

2feO CALL HCHAFMJ, I.AI 

270 A-132 

2BO C { J , I I -A 

290 P-P-l 

300 IF P<>32 THEN 360 

310 P-97 

3ZO GOTO 3&0 

330 A-O 

340 C(J,I)-A 

330 GOTO 290 

3AO NEXT I 

370 NEXT J 

380 CALL SOUND! HO, I 10,21 

390 XO-4 

400 VO-12 

410 FOR TT-3 TO 28 

420 FOR SB-3 TO 22 STEP 19 

430 CIBB,TT)-132 

440 NEXT BB 

430 NEXT TT 

4iO FOR FF-3 TO 28 STEP 23 

470 FDR KK-3 TO 22 

480 C(KK,FF>-132 

490 NEXT KX 

SOO NEXT FF 

310 CII2.27J-134 

320 CALL MCHAR(12,27, 136) 

330 CALL KEYU.K.S) 

340 IF f./S THEN 530 

330 XX»-STR«(!tN> 

560 FOR 1-1 TO LEN!STR«(XN>) 




370 


CALL VCHAR17,2*I,ASCtSEG«<XX», 1,21)1 


1130 


Mtl)-I 


see 


NEXT I 




140 


GOTO 820 


390 


YY»-STR«(YN> 




11SO 


FOR 1-1 TO 3 


60O 


FOR 1-1 TO LENISTR4 


IYN1 ) 


160 


A-C(YN,XN-I) 


610 


CALL VCHARC9,2«-I.ASC(SEG»!YY*. 1,2) ) 1 


170 


IF A-O THEN 1190 


620 


NEXT I 




ISO 


M(I)-1 


630 


IF S-0 THEN 330 




1190 


A-CIYN-l.XN-I) 


640 


CALL CLEAR 




200 


IF A-O THEN 1220 








210 
220 




660 


XN-XD 




A-C!YN*1,XN-I) 


670 


YN-YO* 1 




230 


IF A-O THEN 1230 


680 


CALL HCHAR!3,3.ASC( 


■S") 1 




G(I)-1 


690 


GOTO B70 




290 


NEXT I 


700 


XN-XO- 1 




260 


GOTO B20 


710 


YN-YO 




1270 


A-CIYN.XN) 


720 


CALL HCHARI3.3.ASCI 




280 


IF A-O THEN 1350 


730 


GOTO 1070 




290 


IF A-134 THEN 2940 


740 


XN-XO* 1 




300 


CALL BOUND! HO, 110,2 


730 






310 


XN-XO 


760 


CALL HCHAR(3,3,ASC< 


E" > ) 


320 


YN-YO 


770 


GOTO 1270 




330 


n(l J-l 


7BO 


YN-YO-1 




340 


GOTO 820 


790 


XN-XO 




3SO 


FOR 1-1 TO 3 


BOO 


CALL HCHAR(3,3,ASC( 






A-C(YN,XN*I) 


810 


GOTO 1470 






IF B-O THEN 1390 


B20 


GOTO 1670 




3BO 


H1D-1 


830 


GOSUB 2BBO 
XQ-XN 




390 


A-C(YN*1,XN+I) 

IF A-O THEN 1420 


BSO 


YO-YN 




410 


DIII-1 


B60 


GOTO 530 




420 


A-C(YN-1,XN+I> 




A-C(YN.XN) 




430 


IF A-O THEN 1450 


880 


IF A=0 THEN 930 




440 


G!I)-l 


890 


IF A=134 THEN 2940 




430 


NEXT I 


900 


CALL SOUND!! 10, 110, 


2) 




GOTO B20 


910 


XN-XO 




470 


A-C(YN.XN) 


920 


YN-YO 




480 


IF A-O THEN 1330 


930 


nrn-i 




490 


IF A-134 THEN 2940 


94 O 


GOTO 820 




300 


CALL SOUND! 110, 110,2 


950 


FOR 1=1 TO 3 




310 




960 


A=C!YN*I.XNJ 




320 


YN-YO 


970 


IF A-O THEN 990 






IH 11-1 


990 


mn*i 




340 


GOTO B20 


990 


A-CIYN+I.XN-I) 




SOO 


FOR 1-1 TO 3 


I00O IF A»0 THEN 1020 




360 


A-C!YN-I,XN> 


1010 DI1J-1 




:, :•'., 


IF A-O THEN 1390 


I02O A=C(YN+I,XN*1> 




3BO 


M(I)-1 


1030 IF A-O THEN 1030 






A-C(YN-I,XN*1) 


1040 S<I)-1 




600 


IF A-O THEN 1620 


1030 NEXT I 






DID-1 




GOTO B20 




620 


A-C(YN-I,XN*1) 


1O70 A-CIYN.XN) 




630 


IF A-O THEN 1630 


toad 


IF O-O THEN 1I50 




640 


GCI>-1 




IF A-134 THEN 2940 




6SO 


NEXT I 


hoc 


CALL SOUND* i lO. 1 lO 


21 


660 


GOTO B20 


1110 XN-XO 






IF (1(1)-1 THEN 1770 


1120 


YN-YD 




680 


IF M(2>-1 THEN IB20 



CALL ' 
CALL ' 
GOTO 1 

HCHARf 10, 16. 129,4) 
BBO CALL HCHARf 15. 16. 12S, 4) 
B90 CALL VCHARU1, 15, 130.4) 
900 CALL VCHAR(11,20. 131.4) 
910 GOTO 1700 
920 IF 8<2)-l THEN I960 
930 CALL HCHARdO. 12. 129,4) 
940 CALL VCHARU1, 11.130,4) 
930 CALL HCHAR<13. 12. 128.4) 
"60 CALL VCHARU1. 13, 130,4) 
970 IF H(3)-I THEN 1710 
9BO 0-13 
990 W-10 

2000 E-13 

2010 FDR T-l TO 2 

2020 O-Q+l 

2030 N-W+I 

2040 E-E-l 

2030 CALL HCHAR <W. O, 1 33) 

206O CALL HCHARfE.O, 132) 



GOTO 1710 

IF D(2)-l THEN 2: 
CALL HCHARdO 
CALL HCHARII3.20, 
CALL VCHARU1.24 
CALL VCHAR 111,20 

IF M(3)-l THEN 1 



2670 
2680 
2690 
27 CO 
2710 
2720 
27 30 
2740 
2730 
2760 
2770 

2790 I 

2BO0 f 

2B10 > 

202O » 

2830 1 

2B40 ( 



[(KK.MH.132) 



LL-LL'I 

CALL HCHARILL.MH, I 

CALL HO 

NEXT T 

GOTO 1730 

CALL VCHARI7.24.131, 12) 

CALL VCHARCl. 30. 131.24) 

H-23 



2110 
2120 
2130 
2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
2220 
2230 
2240 



2890 
2900 
2910 
29 20 



Hit 1-0 
NEXT I 
RETURN 
FOR BD-12 IO 21 



( OP- I 2 TO i 



l CALL 



(OH. HI). ]■■.' 



S-13 



r OR 1 



•I TO 2 



29BO 
2990 
3000 



S-S-l 

FO-FD+l 

CALL HCHARIS.R, 1321 

CALL HCHARIFD.R, 133 

NEXT T 



NEXT DB 

:t BD 

NT -VOUS AVE/ I 
■UT -UNE AUTRE I 
AA»-"0" THEN 2' 



Suite de la page 3 



4O40 FOPT=1TO390 HEXT P0K£<;4276-M1-1 

485o 9<*^A?.71- ■ ?■ POVET4.?72.S4 PrD-Ff.4276.Wl 

40*8 Fr^T=ITn399 NEXT PnKE54276,Wl-t 

4079 P0KE5-127-: .? f^F^4??-;--."n ">-yZ'-427f..U\ 

4988 Pi-n-El^21.Sl 

<«f.?B fopt=ito??-hE>:t POrE54783.7«:P01<E54279.252:POKE54283.W2 

4199 F0PT=!TQ93-mext POKE';-4276-Wl-l P0K.E54283- W2-1 

4119 P0KE54273.2 P0KE54272. 134P0KE54299.33 P0KE54279. 126 

4128 P0KE54276.WlP0fE54233.W2 

41 ?e FOPT = JT095 MEXT ! POf E54283. W2-I FOPT = 1 TO280 NEXT ■ POf E34276. Ul -1 

.1140 P0KE54273.3 P0fE542?2.54 F0KE54276.WI 

4150 F0PT=1 10389 -NEXT POf E34276.H1-1 

4 160 PC»'E , ^427-?.2 F1*E54272,220 P0KE^4276.W1 

4179 FnPT=!Tfi?^ NEXT POJ-E54280. 7S POKE 54279. 252 P0KE54233, W2 

4150 F0PT=!TO?5 UEXT:P0fE54276.Wl-t P0KE54293 -M2-1 

4190 pncE=..1273. 2 P0VE54272 .104 PriKE342RCi . 34 PQKE C .4279. 75 

4200 P0KE54276.H1 Pi"pKE54203 . W2 

4210 FOPT=]Tr)180 HEXT P0KE54233.W2-1 FOPT=1TO209 -HEXT:P0KE34276.W1-] 

42J-PI P'-^E54273.?:pOKF-^37?.54'PnKE-,<»27<>,Ml 

4230 F0RT"lT03e9 : HEXT P0KX3427&.HI-1 

4240 P0>"E54273 , 2 ! Pr-KE54272 . 220 POf E54276 . w 1 

4250 F0PT=lT095't-€XT POKE542S0.76 P0VE54279.252 P0KE54283.U2 

4269 F0PT=1T095^CXT P0KE54276. Wl-f P0KE542S3, W2-1 

4278 PC^E54273 \ 2 POf E54272 .104 P0KE542S8 , 32 P0KE54279, 94 

4289 P0KE54276.IJ1 PCif E54233,M? 

4299 F0PT=lTCr?5 HEXT Pni-E54283. W2-1 FOPT = 1T0298 IIEXT P0KE54276.U1-1 

4?99 P0KE54273.3 P0CE54272.54 P0KE54276.HI 

4319 FOPT=lTfJ390 NEXT P0KE54276.H1-1 

4329 PnfE54273.2 P0KE54272.22B Pn*E54276. Wl 

4339 FnpT»lT0?5-»EXT P0KE54239. 76 Pny:E5427?, 252 P0KGS4283fH2 

4349 F0PT-iro?5 NEXT P0KE54276.HI-1 PWE54283.W2-i 

4359 P0KE5427?.2POKE54?72.194 POKCS4290, 34 P0KE54279,75 

4169 P0KE54276.U1 P0KE542S3- W2 

4379 FOPT^i T095 : NEXT i P0TE54283 . U2- 1 FQPT' 1 T0289 ■ HEX I P0KE54276 . U 1 - 1 

4389 P0VE5427?,3 P0KE54272,54 POtfE54276.Wl 

4390 FnPT=lT0399 IIEXT P0KE54276,M1-1 

440H P0KE54273.2 P0KE54272 . 228 P0KE54276.W1 

44 1 9 FQPT= 1 T095 : NEXT P0KE54288 . 76 P0KE54273 , 252 P0fE54233 - H2 

4429 F0PT=lT0?5-t*XT P0KE54276. Wl -1 P0KE54283. W2-I 

4438 P0CE54273.2 POKE54272. 194 POKE54280. 38 PWE54279. 126 

4448 P0KE54276.M1 P0KE54283.W2 

4459 FOPT-1T095 HEXT P0KE54283. W2-I 

4469 P0KE54287. I? P0CE54286.«3 : F0PT-1T9188 NEXT PQKE54276,U1-1 

4478 PCVE1661.81 

4488 P0KE54273 . 3 PWE54272 . 54 POK E54276. Ml 

4498 FOPT=1TO90 NEXT PQVE54290.H3 

4-508 FOPT=1TO200 NEXT P0KE54276. Wl ~ 1 P0KE54299 . W3-I 

4510 P0KE54273.2 POKE54272. 228 P0KE54276. Wl 

4520 F0PT- 1 TO 189 NEXT P0KE54288 , 76 ■ P0KE5427;-i . 252 P0KE54283 . W2 

4530 FOPT=1TO108 tfEXT P0KE54276, Wt-1 P0KE54283. W2-1 

4549 F0/E54273.2 P0KE54272. 104 P0XE54288. 34 P0^E54279, 75 

4558 P0KE54276.W1P0>-E5428?,U2 

4568 FOPT= 1 TO 1 99 HEXT P0KE54283 . W2- 1 

4579 POKE54?87,I7:pf)KE54206,37 FOPT-I T0188 HEXI P0KE54276. Wl-1 

4509 P0KE54273-3 P0KE54272.54 P0KE54276.WI 

4598 F0PT=1T099HEXT P<JKE54?9e.W3 

4698 FOPT=- 1 T0298 ■ HEXT P0KE54276 , Wl - 1 P0)'E54299 . W3- 1 

46 1 9 P0KE54273 . 2 P0KE54272 - 229 P0"E542?6 ■ U 1 

4629 F0PT = 1T0198 HEXT P0KF54289. 76 P0VF.54279 ■ 252 P0KE54283. W2 

4630 F0PT=1T0199 NEXT P0KE54276. Wl-1 P0KE54293.M2-1 
4649 P0KE54273.2 P0KE54272. 194 P0KF54289.32 P0^E54279.94 
4659 P0KE54276.H1 P0VF54283.W2 

4669 F0PT=1T0189 HEXT P0KE54283.W2-1 

4678 P0KE54287. 16 P0KE5428«.47 F0PT-1T0189 HEXT PDKE54276.W1-1 

4688 P0»'E54273.3 POVE'54272.54 P0KE54276.W1 

4698 FOPTMTO90 IfEXT P0KE54299.W3 

4799 F0PT^1T0288 ItEXT P0KE54276.W1-1 POf E54299 . W3- 1 

4710 P0KE54273.2 POf E 34 272 . 228 P0KE54276.W1 

4728 FOPT^lTninp HEXT P0KF54288 ■ 76 P0KE5427? 252;P0KE542»f(O 



18439 PEM 

1B44P PEM 3828-4880- 

10458 REM 

18468 PEM 4890-4918 ■ 

19470 PEM 

10480 PEM 4920-4989 

10490 REM 

]0"«w PEM 4998 9026 



4739 FnpT^lTni00:NEXT:POKE54276.Wl-rPOKE54283.H2-I 

4748 P0KE54273,2 P0KE54272.184 P0KE54289-34 P0VE54279-75 

4750 P0KE54276.W1 : P0KE54283.W2 

4760 FnpT-nO190:NEXT'POKE54283,W2-l 

4779 P0KE54287, 1 7 1 P0KE54286 . 37 : FORT- 1 T01 89 HEXT POKE54276 .Ml 

4788 POV E54273. 3 ' P0KE54272 . 54 ! P0KE54276.M1 

4799 F0PT=1T099 NEXT P0KE54299.W3 

4888 FGPT=1TO280 MEXT PnvE34276.Wl~l P0fE54299.H3-l 
48 1 9 P0KE54273 , 2 P0KE54272 . 228 ■ P0KE34276. Ml 

4829 F0RT->lT0ieO'NEX1 P0KE54289. 76 P0KE34279, 752 P0KE34283. U2 REHPV. 

4 S -,.n FnpT=lTni80'MEXT PCKE54276.Wl-1POKE54283.W2-t 

4349 P0KE54273 ■ 2 P0KE54272 . I 84 P0KE54239 . 38 : P0VE54279. 126 

■1838 P0KE54276.W1 P0KE54283.W2 

4^^-n FnpT = lT0189 HEXT P0KE54283. W2-1 

4&78 FOPT=1TO200 HEXT F0RX»2T076 P0KE54273.X HEXTX P0KE54276. Wl-1 

4889 P0KE1S21 K'POVEIWI i? M=ncnTm7iP 

4899 TflTflS. 147,9. 159.10.295.8-147.6.286.6. 198.21.154.22.227.25.177.19,63,17,37 
490Q PRT821 .154.12.216.19.63.25.177.13,156.19,63.25.177.14,197,12,216,11.114 
4*19 P0Tfll8. 285. 9, 159. 8, 147. 5. 183, 18. 285. 5. 25. 19- 60- 4 -208. 9. 159, 4. 73--1 

4929 PRTH2. 37. 3 54. 3.8. 2. 179-3. 155.4, 12.3.34.4,283-4-73.6. 108,6,16,5, 183.7,53 

4930 09T89. 23 6.188.9,159.8. 147.12,216. 12.32-18-285.14,107.16.47.12.216,19.63 
4949 Ti8THl7.37.25. 177. 24. 63. 21 , 154,28.214, 32.94,25. 177,38, 126.34, 75.51 .97 
4959 0HTR49. 127.43. 52,57 > 172 64. 188-51 .97. 76.252.69. 149. 192, 194.96,254.86. 185 
4969 riflTRt 15.88. 129-129. 192. 194. 153.247- 137.43. 122.52. 198.223.96.254.63, 149 
4978 P0TR61. 126. 54. 11 1-48 127- 34, 75. 39- 141, 27. 36, 24. 63. 17, 37. 13, 70. 13. 136 
4990 TiflTHl 2,32,8- 147-7. 163-6-306.6. 16.4 .73.3.219. 3. 103.3.8.2-37.-1 

499Q DhTR8.147 12.216. 15.70.8. 147. 1 1 , 1 14, 15-78.8. 147. 12,216, 14, 107 
=.«0h P8TR8. 147. II . 114. 14. 107.6.206.9- 159. 12.716.^.296.9. 139- 11 . 114 
cnm PRT86.199 8.147.10.205.3-185.8.147.10,205,5.135-3.147.9.139 
"WO PRT8-. 103 s,.-"= ri. \=.i 4 73. 6-188. 8. 147.-1 
19000 pen 9128-9348^ INITIAL fjPTION? 

10010 PFM 

■' n-:.-;ft-nR";c( TfiPLEflUX HE PPESENTRTIOH 
]<■<■ <■ p[ :■ 

(00.10 PEM 08^0-1170 MENU IHITtHl .rnMTPOlE PF8 TOIITHE? POUR 
inr*=;0 ppi LK DIFFEREHT8 ItPflttCHEMEHTS 



S01.IS-PR0OPRMMF BOUCLE 4 
P0TR5 BOUCLfi 1 



PHTflS BOUCLE 2 
PRTO^ POLICLE 3 



19868 "Fti 
10970 PFM 1100 
10989 PEM 
19099 PEM 1439- 
I8I88 PEM 
18110 PEM 
1017.3 PEM 1699- 
19139 PEM 
19148 PEM 
18158 PEM 2329- 
19160 PEM 
18179 PEM 2269- 
10188 PEM 
18198 PEM 2328- 
19209 PEM 
10218 REM 2399- 
10228 PEM 
18233 PEM 
18248 PEM 2890- 
10238 PEM 
18268 PEM 
19278 PEM 2928- 
18280 PEM 
10293 PEM 2930- 
19399 PEM 
19318 PEM 3929- 
19329 PEM 
19^39 PEM 3070- 
10349 PEM 
19358 PEM 3120- 
19369 PEM 
19379 REM 3179- 
10300 PEM 
19399 PEM 
18490 PEM 3368- 
18413 PEM 
18428 PEM 35RO- 



142 



2010^ 
2230: 



2370 
2888' 



2948 
3818 
3369 
3110 
3168' 
3350 

3370" 
3818' 



I 1 'PFf.l ROES 



ThBlEPJ.i 3 CECRITUPE ET LECTiJPE SUP K7) 
SOUS-PPOGRHMME ECPITIJPE D'lJN FICMIEP 
S0U3-PP00PRMME LECTURE D'UH FICHIER 



LINE VOIX 8 I. A FOIS 
'/OIX 1.2 ET 3 
VOIX 1 ET 2 
VOIX 2 ET 3 

VOIX 1 ET 3 

OLE DE8 
X DES V( 

30US-PP0GPAMME BOUCLE'' 1 ET 

^ni.lS-PROOPHMME POUCLE 3 




•o^° 



oo« e 



SOLUTION DE L'HIPPOREBUS : 








ik 


10 


FOR I 


■ 1 TO 


g jK 


20 


Hill' 




®®<1J( 


3@ 


PRINT 


GHRsK 


X)j \K? 


40 


NEXT 


I 


1 

* 


50 


END 






60 


DRTH 


74,85, 


S3. 84, 


73 


70,73 


,69,g; 


■ 



GESTION FAMILIALE 



Ce programme est destine a lenregislrement des re- 
cettes et depenses de la famille. 
Cinq postes de recettes sont prevus et treize de de- 
penses. Ce nombre peut bien sur etre modifie ainsi 
que ['intitule de chaque poste. 

Claude GAUCEL S 



TRS80 



GOTO IN 

00 CL=i:PRlNTCMfl«<2T> 

10 CLFOB 5«0: DEFDBL D.R. W. X.V 

:-e oi« D<i3>.DC<is>.Diei5) 

-e poiNTae*. stb!ng«i ^i. iftB) 

40 PRINT3H&B. "OESTION FftnlLtW-E - 
50 P»I«jT37&8.STBInG»<31.H'0> 

&a fdri-itoiswinext 

70 CLS:PRINTCHR*123> 
30 GGSUB iTOB 



i REn ■ 



HENU PRINCIPAL 



1010 PEN *-■ 

1B20 RE" — *** 

1030 CLSiPBINTCHP.»(23):P"IWT36a. "nCMU ■ 
IB4B PRIMT3266. -B - PASSAGE DES RECETTES" 
1050 PRIMT3;3B--S - PASSAGE DES OEPENSES" 
1KB PRINT3I94, "C - VISUAL I5QTI0N- 
1070 PRINT3438. "t> - FIN DE TRAVAIL" 
1033 PRINT3522. "E - NOUVEOU MOIS" 
I99B Q»-INK£V«:IF a%--' THEN 1030 
1100 Q.&SC'0»>:O»R-£4 

itia if nil on ft)5 then 1000 

1120 IF A=l GCSUB 30B0:GOTD 1000 

1130 IF ft«2 GOSUB 353B:G0TO 1000 

1 14B IF a-z GOSUB 4000: GOSUB EB00: GOTO 1000 

1150 IF a-i> GOSUB 2500:GOTO 1000 

IIE0 IF Q-3 GOSUB 5000; GOTO 1000 



I REM *»» 



I RE" ■ 



ENTREE DCS DONNEES 



Materiel: TRS 80 modele III 16 K Cassettes. 

tors de lentree d'un montant. le cumul est automatiquement effec- 
tue. pour le mois. el ce depuis ("initialisation. II suffit, chaque fin de 
mois de noter le total de chaque rubrique si Ton desire conserver un 
detail, ll aurail bien sur ete possible d'enregistrer le detail des en- 
trees sorties de chaque mois, mais vu la lenteur des entrees/sorties 
cassettes, I a ete iuge preferable de les limiter. 
Au menu, 5 options, prise en comple dune entr6e, dune depense. 
dun etat des comptes. Celui-ci offre le total des recettes du mois et 
le cumul. le total des depenses du mois et le cumul. puis le solde 
recettes depenses et enfin un histogramme simplifie des pourcenta- 
ges des ditferentes rubriques. 

La quatrieme option, a ne pas omettre. en fin de travail, permet 
I'enregistrement des donnees. 

La cinquieme option, a utihser en fin de mois, remet les comptes du 
mois a et demande le nom du nouveau mois. 
Le programme en I'absence de donnees. ne peut d6marrer que par 
un RUN 5000 pour initialisation. 

Le nombre de rubriques depense ne doit pas etre modifie vu I'option 
pnse d'aflichage en 32 caracteres par iigne pour une parfaite lisibi- 
lite, ce qui entrafne I'impossibiiite d'afficher le litre de la rubrique sur 
les histogrammes. 

A titre d'exemple, le present programme, dans sa version initiale, 
occupait plus de 9 K sans cumul ni histogrammes. Une deuxieme 
version n'en occupait plus que 7 et la presente, avec les deux fonc- 
tions supplementaires, en occupe 5. 



'RINTCHR»<2I> 
RINT312E. "CHARGEHENT DES DONNEES I 
ON (PL0V)";34(iB. "TOPER (ESPACE>"t 
i»«lW\Evli[F 0»O" " THEN 2050 
i INPUT(t-I,l 



-.338&, "rlOGNETO PHONE EN 



:07B FOHI-1T05 
INPUTt 



nii.Rcni 



■ D i I > . DC < I > 



HEnGRISQTION DES DONNEES 



110 RETURN 

5B0 RE" ..... 

510 PEH *** 

520 BE" »*.**.•»•*****••»*»*•**' 

5T0 CLS' PRINTCHR»i23) 
510 PRINT3123. ■'HEMCRISOTIDM DES 
TION (RECORD) "iaaaa. "TQPEB (E5PACE> 
55B S4-INHEY*: IFH»U" " THEN255B 



;33Bf.. "flfiDNETO EN P0S 



1-560 f 
2570 FORI" 



i-l,l 



2-S20 NEXT I 
2G3-B RETURf 
T000 REM -' 



:bib 



RECETTES 



5 REH w» im 'M * »»M>» WM » H ■ M l ftm i 

-07.0 CLS>PRINTCHR«<23) 

38*0 PRINT30. "RECETTES I " IT08I 30) !M* 

-050 PRINT3140." - SAL«IPES _ :3206. " B - LOYEHS" :32EE:. " 

NS FIN. '•:3332, " D - REMBOUPSEnENTS" :3396. M E - VENTES"I3(i 

- RETOUR AU MENU" : 

xeea print37B4."choix i- 

3070 h«=INHEV*:IF R*-"" THEN 3B70 

7320 A-hB€<A») lX"ft-S4lPRIMT3724.ft*HF X(l OR x>E, then 30C 

3090 IF *=E THEN RETURN 

3100 PRINT: INPUT"£NTRE7 VOTRE RECETTE :"!" 



I BCD 



I REI1 ■ 



T-510 REn *** DEPENSES 

3520 RE" *♦.*■».***• **++**+•******« 

3530 CLS:PRINTCHR*I23) 

3540 PRINT30, "DEPENSES I " :TA8' 3.0) SM« 

3550 PRINT312B. "0 - ALIMENTATION- I31EB. " G - EMPRUNT5" ;3192, "B - 

EDF/GDF/ECU ,, :^22'.■*■ H - S0NTE/ENTRET"l325&. "C - IMPOTS" I32ES. " 
I - TRANSPORTS'' :332B, "D - COURfilER" :3352, " J - REVUES-CIG, " :3384 
,"E - L0ISIRS't3416." K - EOUIPEMENT" 

35SB PPINT3448. "P - FiSSURfiNCES":348B, " L - HfiBILLEMENT" S3524, " " 
- IMPREVUS-!358S. " N - RETDUR flU f«NU* 

757B PRIHT37B1. "CHOIX I" 

"53B rs**INMEY*HF Q»-"" THEN 3580 

35S0 fi-fiSC'R«) :X-q-66 : PRINT3724. fit: IFX (1 OR X) \U THEN 3500 

7800 IF *=14 THEN RETURN 

3E1B PRINT: INPUT"ENTREZ VOTRE DEPENSE i"!M 

3620 DOU"0<X)tn 

3630 DC(X)-DCfX)*M 

7.640 GOTO 3500 

4000 REM H i i m » MHM n m r m i nmnnn i l !>!»■>)< 

4010 REM **- VISUOLISRTION 

i820 REM i n i w iii«ii«iiip|iiii|iii i i MH 'M l 

403B CLS:PRINTCHR«(23) 

4040 PRINTSTRING»'3I. 140) 

4050 PRINT:PHINT ,r naiS DE l"lrt»l" CUMUL" 

4060 PRINT:PRINT"SftLniRES ■ " :USING" *•»••••», •»- t R( 1 ) tRC(l) 

4070 PRINT-LOYERS I " IUSING-t""«m»l», »•' IRC 2) lRC(2) 

4080 PRINT"GflIN5 FIN:"IUSING-«"»»ltl», *» n lR(3) :RC<3> 

40S0 PRINT'-REMBQURS. : ": USING" •«*••••. "lfiR(4> ;RC<4) 

4100 PRINT-VENTES t "lUSIMG-ttP^Bit"*. "» - :RfS) 1RCI3) 




10 r-BiF0RI-lT05" Jt-I*R< I>1NE< 

15 KC-0:FORI>ITO5:»C"XC'SC'I)!M( 

20 PRINTTO9(10):STOING»il0. 1401 ! 

30 PRINT-TDTQL 1-JU5INC*»»»»I 

40 PRINTSTRING»'31- 1401 

50 PRINT-TOPER <ESPOCE>- 

60 IF INKEVK!" -THEN 4 1 £0 

70 CL5iPRINTCHfi»'23> 

8B PRINT-OLIHENT. I'-IUSING'Btm 

90 PRINT-EGDF/EOU : " 1USING*«»«I 

00 PR1NT-IMPDTS :-:USIt* 

'IB PRINT-COURRIER 

4220 PRINT-LOISIRS 



::.-=:■. ",1 ■ :." . 



4230 



O 1 >i 



-EMPRUNTS 
4250 PRINT-SONTE ENT. ; 
4260 PRINT-TRONSPORTSi 
4270 PRINT-'REVUES CIG: 
4280 PRINT'-EOUIPEMENT: 
4290 PRINT-'VETEMENTS 

"IMPREVUS 



USING 1 
USING' 
USING' 
USING' 
USING 
USING' 
: USING' 
-5USING' 
"lUSTNG' 
IU5ING' 



4305 PRINTTOB'1B)1STRING»I10. 1 
4310 Y=aiFORI-lT0I3:Y-Y*DU>:NE*T 
4315 YC-BJF0RI-ITDl3:YC-YC*DCII)iN£XT 
432B PRINT3960. " 1ESPQCE) "JUSI «-••»! 
433B IF INKEY»(>" " THEN 4330 



R!NG«<10. 1 



:-vc 



4358 CLSiPRIf 

43E0 PRINT!PRINT:PRINTSTRING»(31. 131) 

437B PRINT:PRINT"RECETTES :-iUSlNG-«"' 

438B PRINT:PRINT-DEPENSES : " !USING-»«' 

43S0 PRINT:PRINT"SOLDE :-;USING-»« 

4400 PRINT:PRINT:PRINTSTBING*<31. 131) 

4410 PRINT-TfiPER (ESPOCE) 

442B IF INKEY»(>" "THEN4420 

4430 RETURN 



I REM ■ 



S010 REM *-• INITIALISATION 

5B20 REM ****....4....*».......... ........ 

SB30 CLS:PRINTCHR»<23> 

5040 PRINT" (INITIALISATION OU 

5050 PRINT- (N)DUVEOU nOIS" 

5.B60 PRINT:INPUT O* 

5070 IF 0*-"N- THEN F0RI-1TD5:R( D-01NEX' 

: INPUT"NOUV£0U HO ISI " Ifl* : RETURN 

5CS0 A»-"I" (DIM D(13>,DC(13>.D1<13> 

5090 FORI-lTQ5:S(I)=0:PCi I'-B:NEXT 

510B FDRI-1TD13:D(I>-B1DCU)-0:NEXT 

5110 INPUT-NOM DU M0IS:-!M» 

5120 GOTO 10B0 

E000 REM .......**.......•.....••••.•.... 

6010 REM •** HISTOGROMMES 

6020 REM 

E030 CLS!PRINTCHRt<23)lB-I 

£040 PRINT312S, "RECETTES : " 1USINGT««»H. < 

E05B F0RI-1T0S 



:F0flI-lT0i;:D<I>' 



(I)-INTi I 



D-101 



6070 PRINT3256*I*E4,USING-«»». M'lBH 
6BB0 A-INTIR1 II) >/D: IF0)24 THEN B«B*. 
GOTO 6050 

6090 PRINT3270* 1*64, STRING* (O. 143) 
El 00 NEXT 

"RINT3S6B. "(ESP0CE1-1 
I2B R«-INX6V*:IFRK)" "THENE120 

CLS: PRI NTCHR« ( 23> I B- 1 

PPINT30. -DEPENSES s" I USING" HM1 

F0RI-1T013 

DKI>-INT(DCI).1001/Y 

PRINT364.I.64.USING-»>l».f»"!DliI 
G2B0 0-INTfDl'I >>/B>IFO>24 THEN B«B.. 
7B 
6210 PRINT378,-l*64.STRING*fR. 143) 



FICHIER TELEPHONIQUE PC 12S1 











165:*3* INPUT 'NOfl : '!B 


PETUPN 


915iUI= INKEYt : IF at 


Votre m6moire vous 


ait defaut? Vous aviez note le nu- 




t<0):L< LEH B*<8) 


385: GOTO '4 


CALL P: GOTO 920 


m6ro sur une boite 


d'allumettes? Voici de quoi vous 


46rDATA '/ 


IMH-l+H READ B*<t).A* 


395:*N" INPUT 'NO" : "!B 
*(8>:L= LEN B*(8) 


917:G0T0 915 

928MF y*=*0* PRINT = 


simplifter la vie!. 






47: DATA V 


GOTO *A 
136* IF A«='F- BEEP II 


488:READ 3SU>tA»: IF A* 
■*F* AND F*9 BEEP ll 


LPRINT : PRINT ": 
RETURN 






Laurent FICHTER 


4S:QATA V 


PAUSE GI: RETURN 
198: IF LEFT* (B»(1).L>*B 


PAUSE Gi: GOTO *A 
410: IF A»»'F* RETURN 


926:IF Ht=*** GOTO 'A 
930:IF MtO'N* GOTO M 


II est necessaire de connaftre deux commandes: 


49s DATA V 


*C9) POKE U*3:i-31,5 


415:!F LEFTf (B*(1)-L)«B 


940: RETURN 


M: donne I'acces au menu. 








417:G0T0 408 


GOTO *0 


I: permet de sortir du programme 












Lancer le programme par 






51 s DATA •/ 








NB: Noubliez pas de suivre scnj 


suleusement les conseils indiques 








dans les lignes de data si vous ne vou'ez pas avoir de probl&mes! 




B*(8J:B»<e)=Bi<9J+- 


=*F* AND F>0 BEEP H 


* BENU •*: 












PAUSE Gi: GOTO 'A 


PRINT Bt(l): PRINT * 








53: DATA •/ 


225:READ 3$ (l).At: fl*U 
IF LEFTI (»(t)il>-* 


43UIF AI-'F- RETURN 
435:IF LEFT* CBKD.tJ"* 


973:*0* PRINT '1 .. CREE 
9Bfl:PRINT *2 .. CATOLOGU 


li:3»T0 */ 




23:DhTh VKJIUEMETS ET 


54: DATA V 


/• GOTO *Y 
235UF A*=*F* 3EEP tl 


/• GOTO 427 
440: IF LEFTI (A*.lJ=B»(0 


E 
935:PRINT "3 .. DETRUIT 


J2!DftTft •/ 




29:D«Th '/ DU S:0KE DE 


55: DATA ■/ 


PAUSE 'COUPLET-: 
RETURN 


J GOSUB -P'-F-t 
445: GOTO 427 


998:PRINT '4 .. RECNERCH 
E 


l3»»Tfl '/ 




SftDflTfl '/DIVISION */* 


70:DATA '".'F 


249:G0T0 225 
245!'Y*K"16: FOR L-2 TO 


449t* 

450: '6' WAIT 8: PRINT 'S 


992SPRINT *5 .. CORRIGE 
9941PRINT -6 .. SAUVE 








)*161 SEEf ::U-47]57 


I 


AVE FICHIER*: CALL 


995: IF U»=*0* PRIHT ' 
















■5'D" t h 's •»• 






RESTORE : PRIST > 


255:A*= HID* <B*(8).J.1> 


£99:wAlT 8: PRINT USING 


997:'U* INPUT 'NOfl ! *!B 










: POKE 'J+31I+J+Z-32. 




t<0).*TEL : *!Qt: IF 








73:5I=-|NC0NNU 


PEEK SC699: NEXT J:K 


*(d; using ;* •; 


Bt(8)-*«* OR Ot«*«* 








S8SUAIT 9: »RIHT 'LEQUE 


=7:B*(8)=0I=Z-19( 




GOTO *A 


:7:3ft7A '/ VEILLEZ A nE 




34SQ6T6 V VEAU DES 


L ?"l CALL 0_. 
35:A*= INKEVt : IF A< 


NEXT L! RETURN 
384:* 


CALL 0: RETURN 
889:*F* «AIT 9: PRINT B* 


999:RETURN 








CALL P: GOTO 98 


385:'5' INPUT *NOfl : 'SB 


(!>:■ (O/N)*: CALL 













*(8):L- LEN Bt<fl) 




o° M 






38:0hTa V UNE VICGULE 


90: IF M"-r"- EmD 


315:READ B»(l)iAU 1 = 1*! : 


CALL P: rinrn aja 








ie«:IF M'*H* GOSUB *!*: 


ic A»"*F" PAUSE Gi: 








37:DATfi •/ ET 3ES 


GOSUB -n-t PRINT • 


GOTO 'A 




Q /T^l 






.,. 


PRIHT 


325:IF LEFTI (B*(1).D=! 


RETURN 








194HF VAl At<l OR VAL A 


KB) GOSUB *F*i 


323: IF aio-n* GOTO *f 


o (yy 








t>6 GOTO 89 


GOSUB 'U':B»C8)=B«(9 




22:DflTfi '/ P = TfiPEP. 




39SDATA V8UIVI8 DE 


H36:G0SUB A* J GOTO 'A 


: GOTO *V 


859:*P* IF Ul='0* GOSUB 
690: CALL P: RETURN 


Sp=^ JL"^ 


25:Dfi T A VUHE LIGWE 3E 




aaiDATfi V 7 ESPOCES. 


129:-2* GOSUB 'I 


339JG0T0 315 


355: GOSUB 698 


// ( \\ 


-,• 






I39:PEAD B*'. 1 ). At: J«J*1 


339f* 


356:01= INKEYi : IF St 


it — f — ~a\ 


2«!DftTA */ 3&T6 se 




4i:DBTP, V C EST a CE 


I35UF Af.'f »ause *;• 
HOBS . peste *:j-m 


355: M' WAIT 9: PRINT •( 
ONOR. (2>TEL*i CALL 


CALL P: GOTO 958 
857:GOT0 836 


f5£&2r<r~ J) 


2?:3hT& ■/ COMPOSE DU 




42:DATfl '/nOrtEMT OU IL 


GOTO 'A 
1401 IF LEFTI (B*(I)i1)"' 



365:AI- IKKEYI : IF A» 


GOTO 'A 


//w^PSp a/ 


26:D&7« •/ nrj* iDotoa 




4J:DhT0 '/FaUT APPUYEP 


/* GOTO 139 


CALL P: GOTO 373 
378: GOTO 365 


86e:USING : RETURN 
980:'P UAIT A: POINT *I 


JevF ^^if/M 


27JDflT(l */ 8UIV1 DE 




44lTIATfl V SUR "EMTERn 


B*Il GOTO 139 
164:' 


373:G0SUB *I"I ON VAL Ai 
GOSUB 'H'.'T': 


NPRIflANTE (0/N> ?': 
CALL 





SPATIO JEEP 



Navkjuez enlre mines, rochers, tunnel et soucoupes a 
bord de votre spalio-jeep tnebranlable...Sauf erreur de 
votre part! 
Record a battre: 1008 points. 

Nicolas TRUB 

Score: Les seuils de resistance restants a ft n Ml sont multiplies 
par 100 puis ajoutes au score final affiche. Celui-ci apparait en haul 
de I'ecran a chaque accident 
Pour obtenir un bon score il laut: 
Tirer et sauter Ires peu (le moins possible). 
Garder ses 3 seuils de resistance. 

Des la fin de lancement du programme, le but du jeu ainsi que les 
touches utilisees sont attichees sur I'ecran. II suttit alors de pressor 
une louche pour que debute le jeu, I'ecran se parseme alors d'etoi- 
les representees par des points. 

Le vehkrule que le joueur doit conduire est represente de cote. Pour 
parvenir a la base, la jeep doit traverser 9 zones en employant di- 
verses armes qui lui permettent de (aire face a de nombreux obsta- 
cles qui sont parsemes sur le parcours du veriicule (voir tableau des 
zones). 

Le joueur dispose en permanence des donnees suivantes attichees 
en haul de I'ecran: numero de la zone, seuil de resistance. 
Le seuil de resistance qui est, au depart, egal a 3 diminue dune 
unite chaque fois qu'il heurte un obstacle quelconque, quand il est 
egal a 0. la partie est perdue. 




ZX81 



ZONE 


CARACTERISTIQUES ET 8UT 


TOUCHES A PRESSER 


CONSEQUENCES SUR LE 
SCORE 


AORESSES 

CORRESPONOAN TES 


1 


MINE: 

11 taut sauter des "X" (mines) 


Saut (propulsion): 7 


Chaque saut: - 5 points 
Chaque mine passes: + 30 
points 


30 a 90 


2 


ROCHERS: 

il faut detruire puis sauter des 

rochers. 


Tir (laser): 8 

Saut (propulsion): 7 


Chaque saut ou tir: - 5points 
Chaque rocher passe: 130 
points. 


100 a 190 


3 


TUNNEL: 

II taut traverser un tunnel. 


Saut (propulsion): 7 


Chaque saut: - 5 points 
Chaque etage passe: + 30 

points 


200a 290 


4 


FUEL: 

Il faut avaler des "?" (bonus). 


Normal: 1 
Pinces: 


Chaque ouverture des pinces: - 

5 points 

Bonus: entre et 50 points. 


300 a 390 


5 


TREMPLIN: ' 

11 faut sauter le tremplin. 


Tremplin: 6 


Chaque deplacement dans cette 
position: - 5 points 
Tremplin pass6: + 30 points 


400 a 490 


6 


PIEGE: 

II faut ecraser des ' 


Saut: 7 


Chaque saut: - 5 points 
Chaque ecrasemenl: + 7 


500 a 590 


7 


SOUCOUPE: 

II faut d6truire la soucoupe es- 

pion. 


Tir (laser): 8 


Chaque soucoupe detruire: 18 

points 

Chaque tir: - 5 points. 


600 a 690 


6 


ROCHER: 

II faut detruire et sauter des ro- 
chers. 


Tir (laser): 8 
Saut propulsion: 7 


Chaque saut ou tir: - Spoinls. 
Chaque rocher passe: + 30 
points 


700 a 790 


9 


BASE ENVUE: 

II faut Ireiner sur la plateforme 

grise (FIN). 


Retro-frein: 5 


Chaque freinage inutile: - 5 
points. 


800 a 890 



CAAACTERESi 
♦3PATI0-JEEP*" 



ios. 

aoe. 

307. 
343. 
3*3. 
34.9. 
404.. 

4ia. 

501. 
014. 



522. 

347. 

301. 



633. 

90S. 
S18. 

903. 

960. 
9SS. 



901. 
903. 
900. 
990. 

999. 
1000. 

1202. 
1999. 
2002. 
2004. 
2010. 
2030. 
2033. 
3010. 



'■TOPER SUR UNE TOUCHE" 
"SEUlL DE RESISTANCES / 
ZONE 1 INDICATIONS-RADAR 

"MINE" 

"ROCMERS" 
'•TUNNEL - ' 
"FUEL" 
"7" 

"GAGE" 
"BONUS" 
■TREMPLIN" 
"XO" 

■■piece- 

■ qxox0x0xoxoxox0>0x0xoxox 

0X0XOXOX" 
' xOxOXOXOXOXOXOXOXOXOXOXO 
XOXOXOX" 

■■XOX" 
■OXOXOXOXOXOXOXOXOXOXOXOX 

OXOXOXOX" 

SOUCOUPE" 



'RRRIUEE OfiNS LA BASE" 
■■L.OROINBTEUR DC SORO 
PREN0...EN CHRRQE LA 
SUITE DES ... OPERATIONS 



■BRRUO" 
"SCORE" 
"UNE AUTRE 



"eNOOM«CEMENT TOTAL' 

■■0-0 rev* 

■0 DESTRUCTION" 

"UNE AUTRE MISSION?" 

" tO/Nl " 

"FIN4" 



i#S 



3 PRINT l 

MEMINER UOTRE 
»s:derpl JUSOU.fl 
US RTTEND LE 
CHEF DES FORCES 



i PROPULTION 
I CANON LASER 
, TREMPLIN 
, AETAQ-FREIN 

EPO-PINCES" 

INT AT 19,0. 
*", AT 19.6, ■ 



flTto-jeep» 

__ DEUEZ _ 
UEMlCULE INTE 
POINT I OU UO 
COM AND ANT EN 

GALACTIOUES. 
POUR CONTROLE 



I 



WtflUooui 



_ A-ao 



iJRt* 



20 LET 

ai let __ 

23 FOR F-0 TO 3 

"PINT RT 3, 17; 



ajpgi' 
3^n£x- 



MINE", AT a, 1 



30 REM »BOUCLE. 1« 

32 LET B-B-3 

33 IF 6-0 TMEN LET N.N*1 

34 IF 6-0 TMEN LET SC-SC*30 
38 IF 8-0 TMEN LET 8-30 



36 PRINT RT 19,16 




PRINT RT A- 

LET A-30 
PRINT RT 30.0. 



fl-1,18; 



1"; AT fl-l, 16; H 



(EN goto ea 



■|g 



64 PRINT RT __ 

68 LET SC-SC-a 

70 IF 18-17 AND A-801 OR (8-16 

RNO R-20) OR C6-1S RND P.. 20) TM 
EN GOSUB 1000 

60 IF INKEY«-"6" TMEN PRINT RT 

19,16;" •" 

89 LET 0-0 

90 QOTO 38 

i0e rem mm- 

101 IF Q-0THEN PRINT RT 1,39;" 
3" 

103 IF 0-1 TMEN PRINT RT 1,39; M 



103 LET 

104 LET 

103 LET 
103 LET 
137 FOR F-0 TO 

"" PRINT^^a, 

'n!W 



17; "ROCHERS";RT 



110 REM 
115 LET _ 
120 IF 8-0 T 
123 IF N-4 R 



60UCLE;2* 
LET 



ID Q-l TMEN GOTO 73 



iae IF 8-0 THEN LET 8-30 
130 PRINT RT R,16, "0-0";RT fl-l, 
IB; "i ■>"; AT A-8,15; " 
133 IF 0-1 THEN PRINT RT 30, B; " 



134 PRINT AT 31,0, 



INT RT 30, B; 



138 IF 0-1 THEN PRINT RT 19,6, 



143 LET R-30 

146 GOTO 160 

147 LET R-19 

146 PRINT RT 30.18: 



EN GOTO 147 



149 LET SC-SC 
160 IF INKEY* 
181 GOTO 160 
15a PRINT AT 19.18 



THEN GOTO 158 



IJH KMini Ml 1 I . 1 ' J i » 

153 IF B-34 THEN GOTO 187 

134 PRINT RT 19,16; " 

133 LET SC-SC-B 

158 GOTO 1B9 

187 LET X«l 

139 PRINT RT 19, IB; " 

160 IF A-30 RND (0-16 OR B-16 
R 6-17) TMEN 00SU6 1000 

170 IF X-l TMEN GOTO 178 

172 IF 18-16 OR 6-18 OR 8-171 R 
NO R-19 THEN OOSUB 1000 

175 GOTO 190 

190 GOTO 11 

aaa rem pM 

301 LET ITOO 
203 LET A-80 

HI rgp S-§i TO STEP -1 
20B IF 6-14 TMEN PRINT AT 21, 
; "0-0", AT 30,16; " 

a06 PRINT RT ai, 
TUNNEL", AT 3,17; " 
307 NEXT B 
306 LET 6-30 
309 LET A-81 
210 REM *flOUCLE,3* 
315 PRINT AT 1,39, "S" 
380 LET B-B-3 

aaa print at c,B;"JM",flT c 
; ■■ ";AT C-2,8; " "TmT C-3,8 

";AT C-*,B;" ",AT C-B.B;' 1 ' 

334 PRINT AT C-6,B;"J'' 

236 PRINT RT A , IB, ''O^*" ; AT 
IB; ") ■>", AT A-8,15, " 

336 IF 6-0 THEN LET C-C-l 
327 IF 6-0 THEN LET SC. 30*30 
338 IF 6-0 THEN LET 6-30 

330 PRINT RT C,0;" ",AT C-4,0; 

333 IF (A-C-l AND 8>16) TMEN LE 
T A-C 
333 IF (A-C-3 ANO B<16) THEN Le 

T 334 i? INKEY|-"7" THEN GOTO 336 

236 GOTO 339 

236 LET A-R-l 

337 LET SC-SC-B 

336 PRINT AT A*1,1B," " 

343 IF A-C ANO 6-16 THEN QOTO 3 
44 

343 GOTO 380 

344 G03U6 1000 
346 LET R-A-- 



1, 



iTO^0( 



OTO 330 
CM ■■---- 

RINTAT 1, 



390 GOTO, 

300 REM 

301 PRII. 
30a LET ■ 
303 LET I. _ 
364 LET A-16 
308 PRINT AT 13, 

306 FOR F- 



iOTPRiENT A" 
i«o!W 



REM »BOUCLE:*.*« 
JU LET B-6-4 

313 IF B-l TMEN LET : 

314 PRINT RT 13, B; " 

0-0;;, AT A-l, 15; ")•>■■, AT A-a,lB;" 

317 IF Y-l THEN LET SC-3C-6 

318 IF Y-l THEN PRINT AT fl,15;" 

a-a-.AT R-i, 16; ")-<"; at a-i,i?," 
C";AT R-3,15;-' 
330 LET A- 18 



^a^PRINT^ATlJ^^ "1 
522IFINKEYt?T' T 



MEN GOTO 334 



EN PRINT AT fl-1,17 



aaa goto 333 

334 LET A- 17 

38B PRINT RT 
386 IF Y-l Tl 

'387 IF INKEYI--6" THEN LET 5C-S 

C-5 
388 IF INKEY4--6" THEN PRINT AT 
A -1,18; " « , ;RT A-1,19;" 

339 IF Y-l TMEN PRINT RT A-1,17 

'330 IF 8-3 THEN LET N-N*l 

333 IF 8-8 THEN LET SC-SC*30 

334 ir B»a THEN LET 6-36 
■"■■ TMEN LET Y-l 

TMEN LET SC-S 
C-6 
343 IF N>0 TMEN PRINT RT 17, B-l 

?";AT 17, a;" 
4 IF INKEYJ-"1" THEN LET Y-0 

345 LET A-INT (RND«30> 

346 IF N>0 AND Y-l AND B-l-17 T 
MEN LET SC-SC+R 

347 IF N>0 RNO Y-0 ANO B-l-17 T 
MEN LET SC-SC-R 

3*8 IF N>0 RNO Y-0 ANQ 8-1-17 T 
HEN PRINT RT J.9 ,0. "Bgip" , -R 

349 IF N>0 AND Y-l Afj& 6 -1-17 T 
MEN PRINT AT i9,«, "■■■ "; A 

350 If Y-l AND B-l-17 RND A-17 
THEN PAUSE 30 

381 IF N>0 RNO Y-0 AND B-l-17 T 
HEN OOSUB 1000 

388 IF B-l-17 AND A-17 THEN PRU 
SE 30 

363 IF N-4 TMEN GOTO 400 

390 GOTO 31 

*00 rem ad 

*01 FOR F-0 TO 10 

*03 LET N-0 

403 LET 6-30 

404 PRINT AT 17,37; " 
" "TREMPLIN"; AT 8,17, " 



IS 



*0B __ 

*06 LET R-18 

407 LET B-88 

*06 PRINT AT 1,89;"8" 

*09 NEXT F 

410 LET 6-6-3 

*12 PRINT AT 16,B;"J1| 

B*l,"Ji ";AT 19.6.3^ 

8*3;" ";AT 81 ,6*3; "M" 

413 LET N-N*l 

414 IF K-l THEN GOTO 418 

416 PRINT AT A , 16, ■■0-0", 

6; " (->", AT A-3,15, " 

418 IF INKEY«-"B" AND B> 

PRINT AT A-1,17," • 



1, 17. " 

48a ir 



«0"; RT A-3,16; 

430 IF K-l THEN OOTO 436 

431 IF B-1B TMEN GOSUB 1000 
433 IF B-0 TMeN GOTO 488 
433 IF K-0 THEN GOTO 440 
436 IF B-16 TMEN LET A-16 
436 IF K-l THEN LET SC-SC-B 
440 IF 8<-B RND K-l THEN LET 



479 OOTO 490 
400 LET R-20 
403 PRINT AT 19,18; ' 
16;" ";AT 17,1b," 



403 GOTO 800 

*90 QOTO . 

300 REM — 



OTO 41 9 

cm pa-- 



1,30; "6";RT 31, 15. 



",TA6 
TRB », " 



806 LET B-27 
307 LET N-0 
898 LET K-0 
809 LET SC-SC*30 

310 REM *BOUCLE;a****** 

311 LET 6-6-3 
513 PRINT AT A, 18; "0-0" 

»>";AT A-r '■ 

PRINI^T 
~ JnKEViTTThEN GOTO 617 
316 QOTO 580 
517 LET SC-SC-8 

519 PRINT AT R-1,16;" «";fl 

T A ' 



mmm 



523 
684 
586 
638 
539 
530 
831 
538 
539 
540 
541 
643 
543 

-1 
344 

548 
548 
546 
347 
548 
549 
550 
533 

3C*3 



>1Q THEN LET R-ae 

If B-3 THEN LET SC-SC+30 

IF B-3 THEN LET N.N*1 

IF B-3 THEN LET K-0 

IF B-3 THEN LET 8-37 

IF 6-17 TMEN LET A-R+l 

IF K-l THEN LET SC-SC*1 

IF INKEYB-"7" THEN OOTO 340 

GOTO 543 

LET R-fl-1 

LET SC-SC-B 

PRINT AT A*1,1B," 

IF B-16 AND A-81 TMEN LET K 

IF B-13 AND A-ai THEN OOTO 

QOTO 349 

GOSUB 1000 

PRINT AT 21.10, 'IBB' 

LET fl-A-1 

IF A-19 TMEN LET SC-3C-5 

TF N-4 THEN GOTO 600 

AND 6-6 THEN LET SC - 

TMEN PRINT RT 31,6*3 



602 LET L-0 

603 LET K-0 
60* LET 8-20 
606 FOR 0-30 TO 

606 PRINT AT 31. D, 

607 PRINT — 

a, 17 """ 



RINTAT2 , 



STgP -3 
"?OUCOUPE" 



608 1 

609 LET 

610 REM iB0UCLE;7n« inn 

618 IF 8-4 THEN LET N-N*l 

613 IT 6-4 THEN PRINT RT 8,8-3, 

614 LET 8-8-3 

316 IP B-3 THEN LET 6-38 

680 PRINT AT 30, 18; "O-0" . AT 19, 



"6V2 S "iV"^nVey , *T"VS : hEN GOTO 686 
624 GOTO 631 
680 PRINT AT 18,lg + ".^, AT 17,16 

T 

St 



■'■*AT 



. .A+ 13,16; ".";Af 18,1 

11,16; "."; AT 10,16;".", 

,10; -."iAT a,l6;".";AT 7,16, 

. ,AT 3, 16; " .",AT 5.16;"." 

637 PRINT AT 1B.16," ".AT 17,16 
," ",AT 16,16," ";flt IB, lj," ";a 
T 14.16," ",At 13,16," ";AT 18,1 
6;" "jflT li.ie," ";At 10,16;" "; 

AT 9,16," ",AT 8,15;" "iAT 7,16; 
" ";RT 6.16; " ";RT 6,16; " " 

63B LET K-l 

689 LET SC-SC-B 

630 PRINT RT 10. IB." * " ; AT 

10,18, " 

631 IF L-l THEN OOTO 634 

638 PRINT AT J it'll an 
- --14 THtN LET L- 



634 IF 
1 
636 IF 



>1 AND 
■1 TMEN 



636 IF L-l THEN 

640 IF 8-4 TMEN 

643 LET K-0 

644 IP 8-3 THEN 



PRINT RT T ,8; " 



PRINT AT 6,8-1, 



680 
690 
700 
701 
706 



716 
V3ffl 

7 58 

rijia 

QJll 
.10 2 

fia* 
.1,1 -, 
; AT . 

II 7 
fl08 



:r n-4 thei 

iQTQ 61 
'RINTRT T 



.26, ■' 



QOTO 
REN ■ 

— T.ao, " 

run r--o TO O STEP 

PRINT AT 31.F; "■I" 

NEXT F 

LET 0-1 

GOTO 100 

GOTO 60S 

PCH -"■ 



AT 1.89, "9" 



LET fl-80 _ _ 

FOR F-30 TO STEP -3 
PRINT RT 3,17, "QASE EN 



Swto p§g$ 18 
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Saurez-vous dGjouer tes griefs d'Hector, votre prof de 
Mo? 
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23 PLnT188,!30.3.30.1:PLOT191.134,ie.4,l:PLOT191,ie 
8-10.4.1 

24 PL0T284. 138,3.39.1 PL0T2O7, 180. 10.4, PPL0T207. 13 
4.18.4,1 PL0T208. 113.8.4,1 

23 PL0T18,68.200.18,3 0UTPtfT*« .COPYRIGHT MBflx83'l 
984. «*,35,53,1 PPUSE1 

26 FLR5H4 FLftSHl 

27 CLSHIPE COLOP.4,1.0,6^ RESTORE 

28 CLS COLOR©. 1.4,2 

29 X-129 Y=160 

38 LINEX.Y.X.Y.3 

31 F0RI-1T0108 

32 REROOX.OY 

33 X-X-DX Y-Y+DY 

34 LINEX-Y.3 
33 NEXT 

36 DRTfl-1. -4, 4, 0.8, -1.-3. -1,0, -1.3, -1,-4, 8, 9, -2.3,- 
2,1.-1.1.1.6,-3.1.-3.1.2,0,-2.8,-8.-1.-6.7,-6,8,-14 

37 W3TH1. -2- 1.-2, 3. -9. -5. 7. 8, -3. -1.-12,-1, -7. -3, -2, 
10.-8.3,8,0.-2.7.1.0.2,14.-3,0,-4.3.0.6,3,-3,3,1,8,1 
.3.8.3,2,0.0.-2.0.-2-2.1.10.-2 

30 DflTft6- 4. 5- 10. 1-3. -6,1 -0,10, -3. 4, 3, 1,0, 6, -3, 5, 2. 3 
,-3,7,-3.0.-1.-6.0.8.1.3.0.5,7,10,0,8,1,13,1,4,-3,0, 

-3.1,-3,0,-2.4.-8.0,-3.5.0,4,-3,-3,-2,8,0,6,-4,1,0,2 
.-3.0.0.4,-1.0,-1.6-9.-5,-1,-12,2.0.-6,-6.-2.8.-4,- 

7,4,0 

39 OfiTft-5. -4. -3. 1,-4, 1,-1, 8, -3, -1.-3, I, 0.-4, 3, -7,0. 
-3-2.-2.-4.0.0,2.-4.0,-2,-2,-2.5.-3,-2.-2,-1,-2,1,-4 
.-3.-2.0 

40 G0T041 

41 x-216^Y=50 

42 LINEX,Y,X,Y.3 

43 F0PI=1T019 

44 PEhDOX.DY 

45 ■/.=X*C-y. -Y=Y+DY 

46 LIMEX.Y.3 

47 tCXT 

48 DOTFO. 3,8,2,2, I . 1 , 1 . 1 . 1 -2.5. 1 ,0, 1 .-9, 1 .-3,-2,-3, 
-1.-3.-1,-3.-2.2.-2.1.0.3,-2.1.1.4,-2,3,-1.2 

4<» LirCtS4.289, 158.298.1 -LIHE192.214. 1 aihC196,217. 



50 LIMEI50.73. 

51 LIMST93.62.1 
ME 199. 43. I 

5? LIHE226.Q3.230.10*>. I 

5"» »177'Y»18a 

54 LINEX.Y.X.Y.2 

55 Ff>RI = lT03 

56 REOODX.OY 

57 X=X+DX Y=YH>V 
30 LINEX.Y.2 

5« PfiTfl6.-6.2.^.3-3 

6P tf.<T 

~1 X=168 Y-I7*i 

62 L 1MEX.Y.X.Y.2 

63 FORI=1T019 

64 PEFOOX.DY 

65 x«x*ox > y=y»oy 

66 LINEX,Y,2 

67 NEXT 

68 DRTH4.-3.3.-2.1 
-8.-1.8,-2,4,-7,1.- 

69 X= 148^=137 

70 LIHEX.Y.X.Y.2 

71 F0PI=1T0I3 

72 PEADOX.DY 

73 X=X*DX Y=Y+DY 

74 L1HEX,Y,2 

75 NEXT 
DhTm5,2.8.-3,6.2,S 




1.1HE234, 192. 1 LIHE238. 106. 1 



76 



-3.2.-7.-2,-7,3,- 



-16,0,-12,-1, 



HECTOR 

,-2,-2 

HR 



77 X=161 Y-96 

78 LINEX,Y,X.Y,2 

79 F0RI=1T06 
88 REH0OX,DY 

81 X*X+DX'Y=Y+DY 

82 LINEX.Y.2 

83 NEXT 

84 G0T086 

85 D8TR4, -5,2,-5. 5, -3,-3,- 

86 X=291 Y=79 

87 LINEX,Y,X,Y,2 

88 FORI =17032 

89 PEfcDOX.DY 
98 X-X+DX'Y^Y+DY 
51 LINEX.Y,2 

92 HEXT 

93 DhTh3,9,1,-I1,-1,U,3.4,3,-4.3,-I,1. 1.1,3,-1.5.3 
.3,-1,4,1,-4,-3.-3,1,-5,-1,-3,-1,-1,-3,1,-3,5.-1,20, 
1,2,3,-2.3,7,1,3,-1,-3.-3,-7,-3.2,-2,-1.-2,7,3,23,6. 
10,-4,3,4,5 

94 PRUSE1 

95 POKEfcFF10,l:PLOT19,220,169,i3.3:DUTPlJT': 3 CHOIX 
S'OFFPEffT 8 VOUS I", 20, 218, 4 

96 C0L0R9, 1,4,6 

97 SCREENS, 150. 110, 180'CLS4 

98 0UTPUT"1- LES VILLES t",20, 144, 1 '0UTPUT*2- LES F 
LEUVES *",20,129,1:OUTPUT"3- LES OCERNS (■". 28, 114,]: 
OUTPUT'LES HERS *" .80.99. 1 ; OUTPUT" TjP*z 1 . 2 . 3 f> 
.jls ^RETURN", 39,49,3 

99 PLOTS, 22. 230,22, 3'OUTPUT"V0US VOULEZ RRRETER LE 
JEU taPez .0. ",18,18,4-FL8SH4:DJRSOR60,60:INPUTH^IF 
fl>3THEN GOT097 

180 PLOT19.220, 169, 13.4 OUTPUT-LES MERS *",88.99.4- 
PL 0T8, 41, 224, 41, 4 

101 CLS IFH=1THENGGT0182.ELSEIFR=2THENGOTOI33 ELSEI 
Ffl=3THENG0T0 I 44 ' ELSE IFR-0THENGOTO136 

182 OUTPUT'DES VILLES VONT SE POSITIGNNER ",28,228, 
3<rxnPUT"DEVHNT VOUS",48,212-3 OUTPUT"Vo.js d*vr»z do 
tin*!"', 12. 196.1 '0UTP1JT"LEURS K0MS-.38. 188. 1 ^aiTPi.rT" PO 
UP JOUEft TflPEZ UHE TOUCHE-.20.25.3 

183 OUTPUT* Pour arr»ter tapez FIH" -20, 13.3 CLS 
104 CLS'OUTPUT , 'o".129,lS6.1:V»-"BREST' , :GOSUB130 
183 CLS'PLOT129,156.5,5,IOUTPUT"o",146,140,l V*-"N 

ANTES* :GOSUB150 

186 CLS PL0T146. 138,5,3, 1 OUTPUT"o", 169. 177. 1 ■ V-"P 
O<.rEN"^GOSijei50 

107 CLS^PL0T169, 173,5,5, l'OUTPUT"o-, 173,290, l^V«--e 
OlJLOGHE-^GOSUBlSe 

108 CLS^PL0T173, 198,5,3, l'0LrTPLlT-o".203,1 16,1 'V«--L 

YON-'Cosueise 

109 CLS'PL0T285, 114,3.5. l^OLrrpi/T-o". 183, 199, l:Vt*"L 
ILLE".G0SL815e 

110 CLS^PL0T183.197.5,3.1'0(JTPIJT , 'o*.193.186.I :V*-"M 
E2IEPES-'GOSl,iB150 

111 CLS PL0T193. 184.3.5. 1 OUTPUT"( 
ET2" GOSU6150 



.222.99-1 v«J=*NI 



112 CLS PL.0T206. 173.5.3. I OUTPUT*. 
fE" GOS».'8I50 

113 CLS PL0T222. 86. 5,5.1 OUTPUT'^*. 2*0. 78.1 </»--HBp 
SEILLE' GOS>. , 8150 

114 rtS PL0T2OO. 76. 5. 5-1 OUTPUT • o " . 190-69,1 V»-*PCT 
PIGHFN* GOSU6150 

115 CLS^PL0T190.67.5.5.10UTPLTr*o".]68. 142.1 Vt»*TO 

ijps- Gosueise 

116 CLS PLOT 16n. I40.5.5.1 OtTPl.T-o- . 187.139,1 V»-*M 
E-TPS" GT«©158 

117 CLS PLOT 187. 137. 5-5. rOUTPVT-f.-. i«i,ift«:.i v»--ft 
niFtr;" cnsi.»ei50 . 

Its ns PL0Tl(tl.184.5.5,!0i/TPL r T-o*.ieO.169.I V»=-P 
FPIS* Gn<y*8!5e 

119 CLS PLOT180- 167-5.5. 1 OUTPUT'r.- . 177. 89.1 W* m m 
NTW_eflH* GO=J_«ei50 

120 CLS PL0T172-87.5.5.10UTPUT-O-. 172-164-1 V**'CH 
f*>TPES" GOSUei50 

121 CLS PL0T172. 162-5-5-1 rtTPUT-n*. 151-185. I V»-*C 
MEPpnuW GOSnei«» 

122 ' 

123 CLS^PL0T15I.183.5.5.1 0UTPUT-O-.146.164.1 V»="S 
8INT M8L0- COSL'ei5e 

124 CLS' PLOT 14b. 162-5.5.1 ' OUTPUT'r.- . 140, 149. 1 V»--V 
fiM4ES"'G0SIJBir^ 

125 a.SPL0T140.I47.35, I OUTPUT'o*. 15».»0. 1 W»--BI 
flPPIT7-GOS».ei5« 

126 CLS PL0T150. 78. 5.5.1 OUTPUT-c.-. 160. 104.1 V»-*BO 
PC€f*.iX^C0Si-ei50 

127 CLS PLOT 160. 102.5.3.1 OUTPUT-r.* , 151 . 124, 1 Vft-'L 
8 POCHELLE"'GOSi.ei50 

128 CLS PL0T158. 122. 55-1 OUTPirr-o-. 172.129.1 V»-"L 
IMOGES- G0SU8150 

129 CLSPL0T172-118.5 5.1 m.rTPirT-o-.190.II8.1 V»-'S 
RINT ET1ENNE* GOSUeiSO 

130 CLSPL0T190. 188,5.5. 1 OUTPt/T'o-, 216. 163-1 V«-*S 
TR8S80URG - ' G0SUB130 

131 CLSPL0T198. 106.5.5. 1 OUTPUT"o-. 222. 63.1 V»-'Bfi 
t;TIR-GOSiJB150 

132 G0T027 

133 OUTPUT-DES FLE'J'VES V>3NT SE Pf«ITIONNEP *.28.228 
.3,0«JTPLTTEVffNT VOl_rS- .40.212, 3 OUTPUT-Vous d«-vr*z d 
onwr-, 12.196.1 OUTPUT "LEURS NOftS" . 30. 180. 1 ■ OUTPUT-P 
rtJfi XUER TBPEZ UNE TOUCHE* .20.25,3 

134 OUTPUT-Pour arr-eter- tiftrz FIN'. 20. 13,3 CLSCOLO 
PO.5.4,3 

133 CLS OUTPUT'O", 168-89-1 V*-'GflRfTWNE"Gns»jei5« 

136 CLS,PL0Tl68.89.5.8.1,OUTPin—e-,187,139.1 V»-'LO 
IRE":GOSUB1S0 

137 CLSPL0T187. 139,5.8. 1 OUTPUT* 8 '.282. 136. I 'V«--S 
ROHE-^GOSI.ei50 

138 CLS PL0T2O2. 136,5.8,1 OUTPUT-e-. 209. 120,1 V«--ft 
HONE -G0SU8 150 

139 CLS PL0T209. 120. 5-8.1 C*JTPi.rr-*'. 212. 93.1' V«-*DU 
PflM"E * : Q^U 18 1 58 

148 CLS'PL0T212,95,5.8-! OUTPUT'O*. 181, 186. 1 'Vt-'SO 
MME*:GOSUB150 

141 CLS PL0T181, 186,5-8. rOUTPUT*8'. 171. 172.1 V«--S 
EINE-'GOSi^lSe 

142 CLS' PLOT!?!. 172. 5-8,1 -OUTPUT-**-, 198,176. 1V*-*M 
ftRNE"GOSU8130 

143 G0T027 

144 Oi.rTPUT"PES MERS t OCERNS VONT SE POSITIONNER ", 
18.228.3'OUTPUT'OEVflNT VOUS* .48.212.3'OUTPUT-Vous d« 
vr-z doT>r»er*.12,196.1'0UTPUT-LEURS NOMS-,39, 180. 1 'OU 
TPt/T-POUR JfJUER TBPE2 UNE TOUCHE*. 20. 23,3 

145 OUTPUT *P<xir *rret*r t»P*z FIN-,29, 15-^'CLSCOLO 
P0.1,4,2'O"/TPI_fT"e-' 'PflCrFIOUE. >-.18,165,3 

146 CLSPL0T125. 118.10. 1,1 OUTPUT*>t-, 133, 113, 1 'VJ- 
■RTLBNTIOUE- GOSU8150 

147 CLS:PL0T123,lie.l8.1.4'OUTPUT">*".133.M3.4'PL0 
T160.218-1.15.I WTPUT-V. 158.203. 1 OUTPUT***. 158. 19 
5 ■ 1 ■ V»= ■ MfiNCHE " ' iWUO 1 50 

148 CLS PL0T160.213, 1-15. 4 OUTPUT-V*. 138. 283.4 OUTP 
UT*t". 158. 195- 4. PL OT208, 28. 1 .15.1 OUTPUT*"*, 198,31 . 1 

OiaPUT"**. 198.41 . 1 :V*=-MED!T£PROMFE- fJJSUeiSO 
14" G0T027 

150 CURSOR20,130,INPUTfl« 

151 IFfl»=V»THEHC0T0152 FLSEIFft*=-FIN-THENG0T027ELS 
EIFfH<>V«THE^^^^T0154 

IV nLrmrr-PPflVO VO«JS *■ 10,1 15.3TnrTPUT*ETES <UJPER" 
.40,93.3:Z*=INSTR»<1> 

153 PETURN 

154 CnTUT-C'EST F8UX*.10,115.1 1 O<ITPIIT-C'EST -.10 
. 105.1 ^m.iTPUTV*. 39.80.3 7«=-IHSTP*< t > 

155 PETURH 

156 HIPE^COLORO.l^^ OUTPUT*VOUS FIES Slip t>F VOUS 
?-.■>«. 18*. 2-0UTPIIT-S1 VOUS RVEZ UN REMOPOS". 50. 160.2 

OUTPUT -Tjpez OUI Mnon T*P*z STOP*. 48. 120, 1 CURSOR 
100.88 I NPUTY* 

157 IFY«»-nul-THFNrinTri?7ei.SFIFY»=-^T0P-THFfK0T0158 
159 END 



l ,206,173.1'V»»*n 



Suite de la page 2 



A pPl.Ett 



42SO 


IF M - -OK 
0,4230 


THEN LIST 4 


42&0 


IF 0* - 'Of. 


THEM CiET D« 


4270 


RETURN 




4280 


REN 




4290 


REM EUOULE 


SPA HAL -r 


4300 


REN 




43IO 


MPLOT A - Z 


B - 5 TO A * 



' MPLOT A - Z.B TO A * 2,B 

I ►* > LOT I. - Z.b • 1: MPLOT A * 

S.B * 1 
i HPLOT A - 4,B * 2: MPLOT A * 

4,8 * 2 
i POKE 0.17: POKE 1,7: CALL 8 



MPLOT A - 4,6 - 4 TO A - Z, 
8-4 

HPLOT A - I . 6 - 4 TO A • 1 , 
B - 4 

MPI.OI A . ;,8 - 4 TO A * 4, 

MPLOT A - 4,8 - 3 TO A - 3. 

HPLOT A- 1,6- 3 TO A* i, 
6-3 

MPLOT A * J,8 - 3 TO A * 4, 
- 3 

HPLOT A - 4,B - 2 TO A ♦ 4, 
B - 2 

HPLOT A - 4,6 - 1 TO A - X, 
8 - 1 

MPLOT A- 1,8- 1 TO A* 1, 



TO ( 



4420 


HPLOT 


A - 


4,8 


TO f 




1 .*< 


4430 


HPLOT 


A * 


1,8 


rn i 




4,R 




MPLOT 


A - 


3,6 


♦ i 








8 • 1 












4430 


MPLOT 
8*2 


A - 


3.B 


* 2 


TO 


A - 


44bO 


HPLOT 
B * 2 


A * 


3.8 


* 2 


TO 


A * 


4470 


MPLOT 


A - 


3.6 




TO 


A - 


44B0 


nr-LO t 

B • 3 


A * 


3,8 




TO 


A . 


4490 


MPLOT 
B • 4 


A - 


3,8 


* 4 


TO 


A - 


.-.■,.,., 


MPLOT 


A • 


3.8 


* * 


TO 


A . 


4510 


■ i 


A - 


S.6 


• '., 


ro 


A - 



4320 

4330 

4340 

4330 
4560 
4370 
43BO 

43<?0 
•MO 



4A2D 

463© 

4&40 

4630 
4660 

4670 

4690 

4690 

4700 



HPLOT A - 3.6 * 3 TO A * ], 

POKE O. 13: POKE 1.7: CALL 8 
BB 

IF 8* - "OK- THEN LIST 42V 
0.432O 

IF B» - "OK" THEN GET R* 

RETURN 

REN 

REN BIDULE SPATIAL 6 

REN 

HPLOT A - 
B - 3 

HPLor a - 

8-4 

HPLOT A - 
B - 3 

MPLOT A - 
B - 2 

MPLOT A - 

MPLOT A - 

HPLOT A - 
B * 1 

MPLOT A • 
B * 1 

HPLOT A - 
8 • 1 

MPLOT A - 
B * 2 

HPLOT A • 
8*2 

HPLOT A - 
B + 2 

POKE O, 15: POKE 



7IO 



"OK 



4770 

4 BOO 
4010 
4B20 



RETURN 

REM 

REM 8IDULF- SPATIAL 

REM 

W m A: I • B 
FOR U - - 3 TO 3 



CALL B 
THEN LIST 438 

THEN GET S» 



MPLOT 
HPLOI 



HPLOT f, ( - : 



4920 

4930 

4740 

4930 

4960 
4970 
49SO 
4990 
3000 
3010 

302O 

3030 

3040 

SOSO 

306O 

3070 



KPLDT P-4,T»1T0P*4 

MPLOT P-2.T *2T0P*2 
T + 2 

HPLOT P-1.T+3TOP+1. 
T ♦ 3 

HPLOT P, T * 4: MPLOT P,T * 

s 

POKE O.lSl POKE 1,7) CALL i 
BB 

THEN LIST 47; 

THEN GET 7* 



I, 4930 



3140 

3130 

3160 
3170 
51BO 
3190 
3200 
3210 

3720 

I 
3230 

I 
3240 

I 
5230 

I 
3260 



RETURN 

REM 

REM BIDULE SPATIAL B 

REM 

HPLOT A - l.B - 3 TO A ' 
B - 3 

HPLOT A - 3,6 - 4 TO A * 3, 
B - 4 

HPLOT A - 4,B - 3 TO A 
B - 3 

HPLOT A * 2,B - 3 TO A 
9-3 

HPLOT A- 4, 8-2 TO A 
9-2 

HPLOT A ♦ 2,8 - 2 TO A 
9-2 

HPLOT A - 5,8 - 1 TO A 

i - i 

HPLOT A - 1 , B TO A + I , B 

FOR V - 1 TO 3 

MPLOT A - l.B • V: MPLOT A » 

,B * V 

HPLOT A - Z.B * (V - lit HPLOT 
A * 3,8 * (V - 1) 

HPLOT ft-5,8* (V-l)I HPLOT 
A + 3,B * (V - I I 

NEXT V 

POKE 0,15: POKE 1,7: CALL. 

IF 8* - "OK" THEN LIST 499 
0.3120 
IF W - "OK" THEN GET U» 
RETURN 
REM 

REM ItlDULE SPATIAL 9 
REM 



l.B - 



MPLOT A - 1,8 - 
I - 4 

mini A - i.8 - 

* - 3 

HPLOT A - U,U - 

HPLOT A ' 4.U - 

HPLOT A - 6.B - 



5270 
3200 
3290 

3310 

3320 

3330 

5340 

5350 
3360 
33 70 
33BO 
5390 



33IO 
5320 

:.', ■.■! 
■.-.-in 



HPLOT A- l.B-1 TO A* I, 
8 - 1 

HPLOT A,B 

HPLOT A - 3,B - 1: HPLOT A * 
3,B - 1 

HPLOT A - 6,8: HPLOT A ♦ 6. 
B 

POKE 0,13: POKE 1,7: CALL B 
88 

IF B* - "OK" THEN LIST 319 
0.3320 

IF 8« " "OK- THEN GET M» 

RETURN 

REM 

REM BIDULE SPATIAL lO 

REM 

HPLOT A. 8 - 3 

HPLOT A - 4,B - 4 TQ A * 4. 
8-4 

HPLOT ft - 3.B - 3i HPLOT A ♦ 
3,8 - 3 

HPLOT A - 6.B - 6: HPLOT A • 
6, B - 6 

MPLOT A - /,D - 7: HPLOI A * 
7.B - 7 

MPLUr A - 3,B - 3 TO A * 3, 
B - 3 

HPLOT A - 8,8 - 2 IQ A • U, 

HPLOT A - 3.B - 1 IO A - 3. 
B 

HPLOT A - 3,B - I TO A - 3. 
B 

HPLOT A ♦ 3,6 - 1 TO A * 3. 

HPLDT A * 3,B - 1 TO A * 3, 
B 

MTl.tlT A - II. f. t 1 IU A • II. 
B • 1 

HPLOI A - 2.8 . 7 It) A - 4, 
B ♦ 2 

HPLOT A - 3.B * 3 TO A - 3, 
B » 3 

HPLOT A - 4.6 • 4 10 A - 6. 
M t 4 

HPLOI A ■ 2,1 ■ 1' hi n ■ 4. 
B * 2 

HPLOI n ■ -,,i< . Z TO fit t 3, 
u * 3 

HPLOT A • 4.1. . i m A . /., 
B • 4 

POKE 0.131 POKE I./: CAU B 
OB 

IF B« - -OK" IHCN LIST S3B 
0,5370 



5600 


IF 8* = "OK" THEN 


3610 


RETURN 


3620 


REM 


5630 


REM RIIXJLE SPAIIAL 


5640 


REM 


;./.-.<• 


HPLUI A,B - 3 


:,/,aii 


HPLOT A - 3.B - 4 T 



HPLOT A - 3,B - 3 TO A * 3. 
8 - 3 

HPLOT A - 6,B - 4: HPLOI A I 
6,8 - 4 

HPLOT A - 7.B - 3t MPLOT A ■ 
/.B - 5 

l»*LOT A - 7.8 - 2 TO A - 3, 



5730 HPLOI A - 



5740 
5750 
3760 

3770 

3730 



-,ii].p 



3H30 
3840 
5830 

MI6M 

3870 



HPLOT A - 

l#T_OT A • 

HPLOT A - 
) * 1 

HPLOT A * 6.B 
< * I 

HPLOT A - 5,6 
> * 2 

HPLOI A • 3.B ' 
( * 2 

POKE O. 15: POKI 



3.B - 2 TO A ■ 

9.0 - I IU A - 

9,B io A - 4.1 

3.B TO ft ♦ 4,1 

6.B • 1 TO ft - 



2 TO A • . 
l,7l CALL 



If lt» - "OK" *HSN GL 

REIURN 

REM 

RLM CANtJN SPATIAL 1 

KFM 

FOR I ■ 8 - li IU U - 

l«UI II - l.X ID A i 



HPLOI 
I' - U 
HPLOI 

HPLOI ■ 
4.11 II 



B in i 



LE PRIX DU DANGER 



Traverser une ville poursuivi par des chasseurs armes 
jusqu'aux dents, eviter les dalles electrifiees tout en 
surveillant votre chronometre. ca vous tente? 

Francois BERNEZ 

Tout d'abord, si ce n'est deja fait, taire CONSOLE„,0 pour suppri- 
mer le decile do louche et ainsi eviter des interlerences dans les 
sons produits par !e haut-parleur de votre CANON. Apres avoir 
lance te programme et avoir pris connalssance du titre. I'ordinateur 
vous demande le nombre de chasseurs contre lesquels vous desi- 
rez lutter; au debut un seul est largemenl sulfisant! Ensuite, lecran 
se vide et laisse la pace au plan d'une ville, ce plan pourra d'ailleurs 
Aire moditie, voire remplace par les ulilisateurs (lignes 10O a 490). A 
I'extreme droite de I'ecran apparaft le mot TIME et en-dessous un 
chronometre allant de 110 a 0, une fois cette limlte atteinte vous 
perdez une de vos trols vies. Vous etes represents par un point 
lance dans un bAtiment en bas a gauche du chronometre. 



f r| rso:rriNIn 


?a 


••as, 34, 


A, 124, 1 


-•?, 136-:M«-STR 


NO' 




2a ) i 










3 onerrorgoto* 


















ANGER 












70 CL^: IMPUTN 


Mm 


* ■!» CU 


■!.„,!'! 


of> «5(i:clJ:n 








SI FORJ-ITON 














»32i MFY 










97 MFVT 








a* ■«»-(.€ FT»IH« 








100 CLS:LINS(0 


Oi- 


•2,0i:li 




LINFCO,?l-(?,7 








110 LINEUP, Ol 




>>:linf- 


4,?>:lI 


,21 iLIMIO.il- 












>:line(0 


B>-<3,8 










3,2u:line(1, i 




I. 201 




153 LINEI40.7) 
133 LINE17.14) 


■ 41 


.7): LIME 


141, Bi: 


(2. 


17>:LIME 


3,141 -( 


1*0 LINE(0,31) 




26 1 :LINE 




<i3,3i>:lime-< 


*.' 




13,28) 


143 LINE(2,2B1 




,28) :LINE-(U,31 


(3,30>-(9,30i:lINI 


(3, 311-4 




144 PRESET(7,29):i*R£SET(3, 


6> :pres 



[9.11-122,11 :NEXT 
1>:LIN€-(22,21):LI) 
I :PHE3ETfi»,i9t 



ESET123, 171 : PRESET (24. I 

260 LINCI32, 121-132, 211 
e-I47,121:LIKE(33,!21-l 

261 LIN€(37, 211-139, 211 



244 LINE143. 141-146, 14) 

201 : PRESET 147, 16):PRES£Ti: 
247 FORI-39T041STEP3 
768 F0RJ-13T019ST£P2:PSET 
SE5ET(37, 211 



:nextj,i:p 



Le ou les chasseurs partent a votre poursuite quand le chrono at- 
teinl 90. Les chasseurs sont armes et vous lirent dessus unique- 
menl dans les lignes drailes , sachez cependanl que plus vous etes 
loin deux et plus vous avez de chances de leur echapper. Les de- 
placements du pourchasse se font grace aux Heches du clavier, 
notez cependant que des deplacements en diagonale sont posible 
et conseil!6s, par la presslon des deux Heches simultanement. Pour 
vous debarrasser de vos poursuivants il vous laudra atteindre une 
des deux cases situfies devant le bailment a I'extreme gauche de 
I'ecran. 

Attention, un balayeur recalcitrant electnlie certaines dalles du sol, il 
est 6vident qu'll ne laut pas se trouver dessus, sinon...Les deplace- 
ments de votre personnage qui se trouve a I'extreme droite de 
I'ecran s'effectuent de la meme maniere que lors de la premiere 
epreuve. Vous devrez (aire tace au balayeur {situe a I'extreme gau- 
che) et appuyer sur la barre d'espacement. Si vous avez terrasse le 
balayeur. I'ordinateur vous felicitera et vous accordera le droit 
de...fecommencer! 

CANON X-07 




320 f0rj"30to33:line i j, 271-1 3, 171 : preset 
ij,21):next 

330 LINE (30,01-161, 0l:LINE(3O, 11-161, II 
340 F0RJ-6TO9:LINE(36, J) - (61, J I 1NEXT 
330 LINE (61, 171-141, 121 I LIME- I 36, 1211LIH 

333 LINE(5B,14)-(39,13I : L INE- ( 39, 13 1 : PRE 

SET (36, 131 

360 LINE (39,27) -161, 271 :LINE- (61, 19) :LIN 

E-(36,19>:LINE-(36,27) :P5Eri37,27) 

343 PSET15B,23> 

366 PRESEK61.22) : PRESET (36, 211 

370 LINE (43,0) -173,0) : LINE (63, 1 J - (73, 1 > 

330 F0RJ-6T09:LINE [66 , J 1 - ( 73 , J 1 : LINE (87, 



10S0 IFDIJ 



4010 IFA-2 



■3, ji: 



>-othenxij)-iix:goto3 



-o:yu>-y(J)»sgn 






1 ,I:BE£PI*99,2 



40O LINE (73, 17) -(73,271 : PRESET (73,22) 
410 LINE (75, 17) -173, 131 : LINE- (83, 151: LI. 
E-193, 121 : LINE- 173. 121 : PRESET (74, 12) 
413 PRESET1S2, 121 :PS£T(79, 13) 
416 PRESET176,13I 

420 line (80,61 - (so, 8) :lin£-(82,9) 1like- 

32,6>:LInE-(80,6> 

430 F0RI-7aT0e3:LINE(I, 171-11, 191 : LINE I I 
,22>- (1,27) tNEXTIL INE (94,22) -(94, 27) 
440 LINE 187,0)- (93,0) :LINE( 97,11 -193,1) 
430 LtNE(93,I2>-(87,IZ>:LIHE-(87,i3):LIf 



I: RETURN 
11Y1*Y+Uf 

i: RETURN 



6013 IFABS(B-Y) >20THENRETURN 

602O BEEP20O0, 1 1 BEEP1 300, 2 : 81 

6030 Q-INT(RND(1)»ABS(B-Y) t2l 

604O IF0>9THENRETURH 

6030 F0RG-1T013STEP3:CIRCLE() 

6060 IFH«< )CHM< 178) THEN90 



460 L 



:(93,1 



E- (93,77) :PRESET(87,19I 

470 F0RI-89TO923TEP3:F0RJ-19TOZ3STEP4 1LI 

NE1I, Jl-II, 1*21 

4B0 LINE1I-1.JI -1I»1, J»2) I NEXT J, I 

490 LINE 194, Ol- (94,311: LOCATE 14,0: PHI NT' 

TIME-i :locatei6,3:printh»i 

491 forj-1TOm:psetix(ji ,voi i :next 

300 PSETIX, VI : A-STICX(O) : IFATHENBEEP20.2 

301 IFX-4AND(Y-130RY-16>THEN1COOO 
510 G0SU840OO 

320 :fpoint(xi,yiithenzi-x:yi-y 

330 X-Xl: Y-YI:P 



7013 ifabs1a-xi i23thenpeturn 

7020 BEEP2000,I:BEEP1500 p 2:BEEP1000,3 
7030 Q-INT1RNDI1] tABS(A-XI*2) 
7040 G0T06040 
9020 CN-X(Jl 

8030 cn-cn*i: ifpointicn,b-d: 



9030 CN-CN-1: IFPOINT ICN.B-D] 
8040 IFABS1XI Jl-Dl I >ABSIX( JI 
-CHELSEDIJI-Dl 



i :BEEP4V, i 
i:locate20-l 



DTHEN8310E 



270 FORI-32T038STEP6: FOP J-23T027: LINE! I 



101o ifvalit») j90then300 

1020 forj-iton:a-xij):b-Y( 

1023 c-sgn1a-xi jd-sonib-y) 

io3o dx-a-c:dy-b-d 

1033 IFC-0THENGOSUB6O00 

1037 IFD-0TKENQ0SUB7OO0 

1040 IFPOINT(DX,DY1-OTMEN> 



thenh«-h».chp«( 128) 
10003 cls:locate6,o:pp.P 



ERRATUM CANON X07 

Dans te programme BATTLE du 
ntrrnero 40, une l»gne s'esl ma- 

tencontreusement gtrssee dans 
le listing, la ligne 96. EHe est 
bien entendu a suporimer pure- 
ment et stmp4emenl_ Ah. I'edi- 
teur plein ecran' 



O FONT* (I 29) -•0,74. 60. 44. 44. 44, 60, 74 

0013 FQWT»( 130) -'94, 7«, 709.40. 164, 90. 13 

,49' 

0020 FONT* I 13J ).- 169,84. 168. 84, 169,84, I 

0030 FDNT«(132I--0.0.0. 112,748,737.196. 

0040 FDNT«I133)-*136, 196,737,249.117,0, 
.0* 

0030 CL5:LOCaTE0,i:PRINTCMn»(i3?i,CN*»( 

33):xi>19:yi-i 

0060 l0catexi.y1 

0063 PR1NTCMR«(|79)| :x-xi:y.vi 

0070 a»stick(0) :gosu»4ooo:locatex,y:pri 
t* ' 1 : locatexi , yl : printcw»« i 179] i 

OOBO C-Y:B-INTIRN0(1I»X) 

0090 IFC-0INEMLINE13,lOI-19,31ELSEIFC-l 

HENLINEI3.10I-I9, II) 

0093 1FC»7THENLINE(3,70>- '9. 191 ELSE I FC- 

THENLINE 13, 701-19,771 

0100 FORl-UOBtLOCATEl ,C:prinic«R«( 131 ) 

10 beep1oo0-i47o.1 

70 a-st1ck(01 i 1fathen00sub40o0 

71 locatex.y:print- -i :locatexi ,vi:pb 



43 IFB(0TMEND-1 

30 E-INT(RND111431 

40 FOR!-BTOB'£:LOCATEI,D;prinICm( 

70 A-STICK101 :1FATHCNGOSUB4000 
80 LOCATEx.YiPRINT- *|ILOCATMX1 i 1 
CHRmii29)|:x>xi:Y>Yl 

FY-DANDX<-IANDX>-BTMEN20000 



0700 IFSTRIGlOlANDX-lANDn 



RINTCKR*! 1321 . '■ 1 ■■■■■■ ■ 1331 



. i;8EEP16O0,2:BE£P: 



0340 CLS: locate: 

ATE4,2:PRINr"F€l 
0330 G0TO20040 

9000 locateo, 1 :f 
:gotoioo80 



>:G0T010030 



PINTCHR»(i30i :8£EP2O0O, 
THENX«-LEFT*(M«,LE 



"DANGEP-I :L0CATE9,C 



Suite de la page 16 



& 



9\£* 



62AO 
ii270 

A2SO 



TO * 



9990 



HPLOT A - 
B - 4: HFLOT A - 4, B - 4 TO 
A - 2. B - 4j HPLOT A * 2,B ■ 
4 TO A * 4,B - 4; HPLOT A * 
i,B - 4 TO A * B.b - 4 

Hi LOT (• - f.B - Z TO A * 9. 



HPLOT A ■ 
1 - 2 

HPLUI a 



M 



9,b ■ 



2 TO ( 



men get , 



REM 

REP1 CANON SPAIAL 2 
REM 

KPL01 n.B - 5 
HPLOT A- I.D-4 TOA» 
8-4 

HPLor a- i,6 - : to a * 

B - Z 
HPLOT A-4.&-2fOA*' 



61 ~0 


FOR t - 


- I TO 2 


6 140 


HPLOT A 
8 * V 


3.B * V TO A * 3, 


fel='j 


NEXT Y 




b!60 


POKE 0, I 

88 


f POKE 1,6! CALL 3 


6170 


if a* - 

, 6 1 50 


OK" THEN LIST 607 


6 ISO 


IF Bt • 


OK" THEN GET Y« 


6190 


RETURN 




62(XI 


REM 




6210 


REM CHOI/ DE LA FIGURINE 


6220 


REM 




6230 


FOR Z - 


TO ISO STEP 40 




FOR Al - 


40 TO 270 STEP 40 


62S0 


S - PEEK 


( - 16-361 - 2 


6233 


POKE 0,I2l POKE l,J| CALL 8 



HCOLOft- Ji GOSUB 6330 

GET A« 

IF A* » CMR» (27) THEN GOTO 
7O0O 

IF A» - CHR* (13) THEN GOTO 
6430 

HCOLOR- Ol GOSUB 6350 
S - PEEK ( - 16336) 

IF Z - 130 AND Al - 240 THEN 

GOTO 6230 



HPLOT ' 

HPLOT ( 
>,Z - 9 

HPLOT I 
;. I - 6 
HPLOT ( 
:,Z - 7 
HPLOT ( 



2, 



l.Z ' 



PEH 
REM 

HCOLOR- 3 

HPLOT O.Oi CALL - 30B2 
HCOLOR- 
A - 14010 - 93 
IF 1 - 10 THEN GIJSU& 6340 
IF Z - 30 THEN B03UB 7290 

If j . </o thf.n BOSUE ) [60 

11 l - \Z>J THEN GUSUB 7430 

GO TO 6620 
REM 

IP Al •> 4'J IHEM SOSUB /'." 
IF Al - BO tHEN BOSUB 10O0 



i TEXT I HOME 1 NORMAL 

. VTAB 2l PRINT "VOULEZ LE LI 

STING DE LA FIGURINE CH0I9IE 

I VTAB 4! HTAB 17: PRINT " fQ/ 

Nl" 

i VTAB 5: HTAB 19: GET Al* 
. !F Al» - CHR« !27) THEN GO 

7000 



Al« - ■ 
190 



, .: DK .. 

Z » 10 THEN GOTO 6740 

Z - 30 THEN GOTO 6B10 

1 - 90 THEN GOTO 6860 

I - 130 THEN GOTO 6930 

Al - 40 THEN GOSUB 760 

Al - 80 IHEN BOSUB LOOO 



120 



THEN BOSUB 133 
IHEN GOSUB 136 



(HLN 



BOSUB 200 



6000 iioro 190 



6830 
6840 



IHEM UOSUB 2340 

THEN GOSUB 2630 

THEN OQSUB 2B3 

IHEN GOSUB 302 



IF Al - 


120 


THEN 


GOSUB 1 XS 


6BG0 


IF Al - 


160 


IHLN 


BOSUB 136 


6890 


IF Al - 


200 


THEN 


GOSUB 1 /4 


6900 


IP Al - 


240 


IHEN 


GOSUB 200 


6910 


RETURN 








6920 


GET Z« 








6930 



> 40 THEN GOSUB 3650 

- SO THEN GOSUB 3860 

- 120 THEN GOSUK 411 

- 16'J IHEN GOSUB 429 

* 20O THEN GOSUB 438 

• 240 IHEN GOSUB 477 



6940 
69SO 
6960 
6970 



6990 
7000 
7010 
7020 



703O 
7060 
7070 



IF Al ■ 80 THEN 
IF Al ■> 120 THEN 
IF Al - 1AO THEN 



GOTO 190 

FOR f - 1 TO 5 

HOME 

F'OI-E 0,16! POKE 



POKE O.Pi POKE 
108 

POKE O, 12: P3KE 
18 
POKE 0,41 POKE 



POKE O.P ♦ 2i I 
8BB 
POKE O.Pi P01 E 

POKfl O.Pi POKE 

a 

NEXT P 

TEXT 

INVERSE 

FOR X - 2 IO 24 

FOR Y - 2 10 X ! 

FOR H - 1 TO lOi 

POKE 0,X * 2l PI 

call nam 

I Ml I 'i, _'4[ POKI 
88 

HOME I HTAB Xi > 

"•• A BIENT01 ■•' 

H1AB »i VTAB Y 



7220 
7230 



PCI If •>, i 
B8B 
PUI-E 0.) 



GGSUB 5190 
GQSUB 338 
GGSUB 363 
GOSUB 585 
GOSUB 607 



,2: CALL 8 

3l CALL 88 

- 3082 

14i CALL 8 

E I. 41 CALL 

P * 31 CALL 

Pi CALL OB 



NEX 



2 I CALL 8 
B Vi PRINT 

i NORMAL 



'..M'i 1(111 'i. 

H 
7250 PUKE 0,; 

888 
726U NEXT Yt 
7270 NORMAL 
7290 viai. 22i 
7290 IF Al - 



7370 IF 
J 30O I F 



4i CALL I 



1 GayiJB 2340 
80 IHEN BOBUB 26 >• 

■ 120 THEN GOSUB 283 
i 160 IHLN GOSUB J02 
i 200 THEN GOSUB 323 

240 IHLN GOSUB 342 

40 IHLN GOSUB 3630 

BO IHEN GOSUB MM 

■ 120 IHEN GOSUB 41 1 
160 mi (i BOBUB 43* 



IF Al ■• 

IF Al - 



7480 IF I 
7490 REII 



200 THEN GOSUB 4 SO 
24u THEN OOSUB 477 

■ 40 IHEN GUSUB 4T70 

■ 00 IHEN GOSUB 3190 
> 120 THEN GGSUB 538 
i 160 IHEN GOSUB 363 

■ 2O0 IHEN GG'JUB 5B3 
240 IHEN GGSUB 607 



YAMS 



Voici un classique des d6s pour votre MZ. Les regies 

du YAM sont scrupuleusement respect6es. Vous pou- 

vez jouer de un & 4 joueurs avec I'ordinateur, ou de 1 

a 5 joueurs sur I'ordinateur comme partenaire. Bons 

des!! 

Mode d'emploi dans le programme. 



A suivre: 

En raison de la longueur 
inhabituelle du listing, 
nous passerons ce pro- 
gramme en deux tofs. 

La Redaction 



Remy GERMAIN 



i SPOKE « 8947,05 



IrtiJ REM * er»i»fi'.i'.]OB * ».*»*».* 

120 CHAN>3EIC0N30LE C 80'C'IK DPf<3 

140 SOSUS 264ee<R0t - * pr*»»nt*t 

wi *em * InltUltMtlon * • •.•*****••*••****••••«■*- 

.TO CLRi&IM L»'2e,7>,0f"3>,Vlt'-6»,V2»<&XV3*<6).D<3 
..-'2' <Z.2>,0Zf6> .04(6) .C»<13> 
230 0OSU1 2200e'PEM - 

ii i-jH-uK ^OOOsPEM * * d4»iln du pourttwr <»♦» d«« 
;"?0 QOS'J? 273901REM • * v«l«".ir» <»•» d*» * 
260 eOSUV 23100'REM * * «*»* .i©u4-» p»<- I'or-dtru.t4w 
I 80901 REM * - *-ill» d* j*-.i lur GP lOO 08 
2?0 OOSUB 34780 s REM * 
3O0 RE" • -sale d-j jei 

-ro aosui 15900 

490 REM * debut d* p*> 

4» MlS'JB 

?00 REM • &r»t>trs 

520 80SUB 

seo rem . 
6ze oosus 3900 

640 SOSUB ?«ee:PEM 

"■^0 REM • 'in di j*u • *•*••**■*»«■ 
720 CONSOLE S 0.4IPRINT CHRKfeX-V. 
" ::GOSUB 192O0SGOSUB 19960: IF MM*" 
740 DIM DP*<S)ieO0UB 2S9eO:RF.M * ■* 
760 GOSUB 26?O0:REM * ■• »ll«gro »,.-. non ti-oppo • 

780 change : console s 9, 24 spoke » 0947,06 
790 end 

ice© REM - 4*but •*» Pkrtl* * *****+****-*+*.***.*.***.**»+ 

S020 PPINTCHR»(.6>; 

1109 POKE * i *47.9^icC»l';0LE S 3.4SF0R r-1 TO 3SFPINT 0«<I> 



sHEXT I: REM 



1120 FOR 1 = 1 TO 3lD<I»IIHEXT I 

i140 SOSUB llOOOiREM * ■» dessin d» I* v»l*ur d*» dea * 
1200 CONSOLE S 3,2HPRINTlPPINT 

1220 PRIMT'Voy» »■./•! Blusn'jrs p*9» ibi 1 i t»» pwr J©M»r- s " 
5240 PRINT" - l'ordin*t*ur *t 1 * 4 jwwrj,' 

1260 PRINT- - 1 * 3 joj«ur*. "SPRINT 

1230 PRINT"Voylffz-vous jou»r *v»c 1 "or-dln*t»ur ? s -i 
i300 SOSU» I93A0IREM * * nusim* I *tQOSU8 1OO60SREM • ■* conttn 
INT M0*<G03UB 10100SREM * + oul <yj non *SMZ-NQUF MZ-2 THEN M2-0 
1320 PR-INTtPSINT"C<.«»t>i#v> d» Jevtxr*. •%** veu» ? I "| 
1340 SOSUB I0300IREM - - •OKlqUS 1 *SG0SUB lOetOiREM * -» con*, i n 
1560 MM-ASC'nM»>-48lNJ-3tIF M2>1 THEN HJ-4 

1380 IF 'MM<0>*<MM>MJ> THEN PPIHT-tJn nOmt>r» »ntr» 1 WftHJt' %. 
1343 

1400 MJ-HMINM-MM: IF MZ-I THEM NJ-NJ+I 
1429 PRINTsFOB !•] TO NM 
1440 I**"-*,-": IF I-l TMFJI I»-"»r" 
1*60 PPIMT"0*nn#i *oi 1* no« dU"l II If I " 
M INPUT NT»'I> 

'409 MEXf I 



■ + d**» 

MZ80 



IW *INO»-MM*SPR 

i»r *IPRIHT MM* 
'.P. ? I -ISSOT0 



SG03LIB 10300IPEM ■ 



1500 IF M2=l THEM PPIHT-L*" 
1920 »EM - !• d* 1* pluc fo 
■ 5«e P»IN7lPPINT-Vous *H»I 
• ft-., la v»I*.jr I ..- 
I5W PRINT-ol-j. +l»v»« en** 

..- i6«e 
--: a print"d*»>i 



nj; 1 



[ do Milt* *r> 



0B •.-SNI*'NJ-.'."MZ-80B" 
L* jwvr «wl aurj ->bt. 



*U 



if," FprnTsppniT-T.p^i ,. 

■ aiaOSUB I8060SPEM * * i> 
[$2B F-PHITCHRt'e.'IPRIHT-'. 
1*48 point- - » dooc*. 

1660 P»r NT" - > mi^*r-< 



ont l*s d*»"i 



l«ur d»crol»»»nt#, "'00 
d4-« »ur*l*nt 1> «*i»* v»l«ur. !•> jou*ur» co 
■o-ir Cflntimj^r.-HSO^UB 1O390SPEM * . *u*tQU* 

is c» ^«» vous ippi.nj*r sur 1* ]«ttr* * C> "•" 
i»ns •:* c*s vous tpeu'j*r «ir 1* l*ttr* ' M '. 

C*s vooi >f>Puu*r sur 1» l-^lr* F '." 



'•» d»« d*» • 

■ •• "^ ■ i: : : - - ■ 







Ul I IC*M1P£M • • la««r- 
Nl • SIM ■ --■:'*-' 

rppun ;:-■'! i i:e»:REM . ■ 

1044 - " ■= •■■ .:c=pr -i : | 

■ '■' " ' 
I9?» IF M2-9 THEN I*sp 

1 !l!.^?SOEM • * j»t d». ■*** d* I'OtttlNtWftT ■ 
1920 PW '«! Tn -.-M' T-.-Pi.c - -,-.-. 
■ . : ; ' IH1 ■ ■ ■ : • I 1 3 00 1 RO1 « • j*K d«* d*s * 

0.CViPftI»fT-J'»t ■-• " : - .^*- ^»,),,- 

t Kfl PfH 

1900 K*HP0R I'- to ] 5TEP -1 

■ ■-■■■-- r>i to n.i 

O.M ir t" I>-1 -^N MMf'l •.HTI'_!.;i»frI 
?0d0 NEVT J 
2060 NE>TT I 
2089 miHTCNR0(6>|iNRf» a *r-IFOH I-l TO n;:m;m .^tid. 

PR INT t print NJ«I>|* s,^, i--:i;rtm- «n«ir, -.mi.-«- 

7120 NE:-TT It IF Mr-0 THEN 2200 
-140 ppP 1=1 TO NJ 

:i60 if hj»<u--m;-608- them hz-i 

2180 NEXT I 

-209 GOS>JB 10029IREK - * continue -I PH I NT CHJW C t > I 

2228 RETURN 

2309 REM * ;-*:.-,-_:■- 4* l'*o-*n • »«***•***»■***»»»..»■■» « ■»■»..««**. 

2320 FOP I-l TO 310CI)-HNEXT HOOSUB 11O0OIREK • * d#s»ln d« ;» val«< 

•SCURSOP 77,2tPRINT" - 

23*0 CONSOLE S 5,24 

2360 C CP I-l TO 20SFCW J-l TO NJ*1 

23ee if <i«ie)*(i-ii>*ri"i9> then 24&e 

;49n PRIHTL0<I(J>| 

2420 NEXT J 

;440 PRINTL*<I.7> 

2469 NEXT I 

2430 CH»29lF0R I-l TO MJlNHf »NH*( I > S IF L4^I(NH»>>7 THEN snt-LEFT» -*-« . ; 

2500 CHOft«f CURSOR rH,6iPRINT nhsi 

2529 NEXT I 

2?4(> RETURN 

3000 REM - ptrtif * «**•••*•-•*••***•••*•••............*•*..■■......., 

3020 CONSOLE S 22,24 

3190 FOR K-l in lJiREM • nombrr d* C»»»* » jou*t- * 

3200 FOR I-l TO N.tsREM - «©•**-♦ d« .iou«urs * 

3240 IF I-MZ GOSUB 50001REM - + e'wl * I *o*-di n*t«vr d* .ou*»- -iGOTO . 

3200 PRINT NJ*<I>;- c*#st ■ toi d* jou#r.- 

3320 FOR J-l TO 51[>1<J>-1 JNEXT J 

7363 POP J-3 TO 1 STEP -lsREM * r*e**w# d» coup* » ..ow»r • 

3480 PRINT-Ljnc* les d«t (dOuC«v«nt ^0*. ■ov»nn«»«nt "H" Ou <w' , F"'> 
CH-CSRH 

3440 CONSOLE S 0,4iCURSOR 76.2iPRINT Jl ICURSOR 76. 2i PRINT- | -; s CONSOLE S 22>34lt 
.lR?OR CH.CV 

54?0 GOSi.iB 11660IREM • ■• l»nc»r I* 9 d*» •JGOSUP M2vVtREM • ■• j*t J*» Ot-% • 

7500 IF J-] THEN 3900 

7520 CONSOLE S 22. 24i PRINTCHR«6>| -Si tu *st »»tt*f*lt d* t«-» d*» . >rfxn' •■■■ 
i touch* * CR * . " 

3540 PRlNT"Du»Is d*» v«-jv-tu rnwtr ? "nGOSUB lOSOOlREM * • millou* 2 -iFO* l 
.•1 TO 3iOl(LL>-0iNEXT LL 

3369 FOP L-l TO 3 

3608 GOSiJB I0C60IREM • * -■:.,-,• i ,-„,»,- . t IF <ftSC<l*tt>-13>-(L-l > THEN 3000 

3620 IF -a=.CfHMJ>-!3 THEN 3768 

3640 MM-OSC(MM«)-4et IF <MH< I >»<MM>3) THEN PRINTiPRINT-Ut> nc*br* tntr* 1 *' -. .. 
'.o."iG0SUF 1O2O0IREM • * bubIqu* 1 -iGOTO 7320 

3650 01 (MM>-1 (PRINT MM! 

372© NEXT L 

3760 RftlHTsNEXT J 

3800 CONSOLE S Q.4!CU*reOR 77.21PRINT "0" it CURSOR 76. 2t PRINT- I "l i CONSOLE S 22, X 

CURSOR CH.CV 

3640 PRINTCMP«<6nsON I GOSUB 1 1S20. 1 184P, 1 1960, t IPSO. 1 19001 REM • * ooiiU<.n »i 

*.*» polnls ?" 



-■ 



3SS0 PRINT "0 

3920 PR I NT "P. 

3960 PRINT-Lorsou* U C.ir.«ir .,. 
"IiGQW.Hi 1O300SREM * - Miiidu* 2 ■ 

4000 CONSOLE S 3.21 

4040 FOR LL-8 TO 2© 

4060 IF R(LL-7.IK>9 THEN 

4900 CURSOR CH.LLSpRINT-*' 

hhIoj* 3 * 

4120 IF ASC'MM»>-13 THEM 4200 

•>160 ClfSOR CN,LL<PRIHT" -( 

4200 ICVT LL 

4240 GOTO 4040 

4290 C-LL-7ipft-OiDf-OttX'-0sOC-08PF-OinW 

3tP2<NN. l>'O(D2'NN.2>-0iHEXT HN 

4720 ON C GOSUB t 2100. 1 21 20. I 21 49, l 2160. 1 21P0. I 22W 
«•. 12320. 12340SREH • - CAlCUl d»» Point* * 

*3*0 IF OE-** THEN rE"0 

-(4PU? CURSOR CH,C*7iPRINT- "is IF OE-r 10 THEN PRINT" 

4449 PRINT 0E« 

44«0 CONSOLE 8 22.24iPRiNTCHR*(6>! 



< bonn» cufi 



1 TO 6ID3CHN) 
0. I22W. IT^TC 



, touch* TR' 



'•GOSUP 1O4O0 1 RC'M 



■OSHEXT N 
i .■. 40. i 3 
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ERRATUM sur APPLE 

BELOTE DE COMPTOIR SUR 
APPLE DU N* 38. 
Mloux vaut tard que jamais: 
deux Ires jolis oublis dans ce 
programme. Oue Daniel BOT- 
TOM nous excuse... 
Tout d'abord. il manquait la 
table de formes ci-dessous pour 
le dessin des cartes. La sauve- 
garde avec BSAVE CARTES.AS 
1000,L$ 220. Ensuite. le pro- 
gramme principal que vous avez 
deja tape ne tient pas a ('empla- 
cement habrtuel. il faut I'impTan- 
ter a ladresse $ 4001. Sauve- 
garder le normalement avec 
SAVE BELOTE DE COMPTOIR, 
et lancez le petit programme 
suivant qui en mfime temps. 
chargera la table des formes. A 
vos comptolrs!. 



10O0- OC 00 I 



1020- : 

1028- ' 

1030- : 



104B- 
1030- 
IO30- 
1060- 



1OB0- 

toee- 
1090- : 

1O90- 

10AO- : 

io*e- 
io»o- : 



l 01 21 24 64 OC 

. 3F 77 09 2E 00 

: OC E4 3fl 3F 07 

I OC E4 3F 06 24 

> 0£ 36 00 29 63 

' 07 20 OC 2D 13 

24 24 bC 09 20 



10C0- ; 
■ OC0- 

iooo- : 



36 IE 3F 07 

49 E4 E4 24 

07 00 21 24 

32 3E BA 3F 

2C 2D 13 F6 

07 OO 49 09 

38 3E OC 60 

■ ZF 07 2B 

I 03 3» JF 

' 3E 07 20 

' 2D 2D 2D 

' 3F 3F JF 

i 2D 2D 2D 

3F V 3F 

I 20 2D 20 

' » jf y 

> 2D 29 IS 



20 24 
4D 31 

24 2C 



3F JF 

2D 2D 

l* *7 

3F » 



I 2F OO 
) 62 00 
47 01 
OE OC 
21 64 
00 09 
20 OC 
OC 3C 
2£ OO 
OE 3* 
24 00 
36 33 
2D 2A 
24 24 
13 13 

2D r- 

FF 3B 
60 2D 
3F 3E 
2D 2D 
3F IE 
2D 20 
1C 3F 
27 2D 
E3 3F 
2D 2D 



10F0- 
10F8- 
ilOO- 

uoe- 

1 110- 



■ 67 2D : 
2D E3 ; 

■ 2D 2D 1 
3H FT : 

so to : 

2D 2D ; 



' 20 20 E3 3F 

27 2D OO 49 

3F OC 

3B OF 3F 07 

' 2D 2D 03 3B 

3F 3F 3F 07 

2D 2D 20 2D 

3F ZF 3F 3F 

2D 2D 2D 2D 

3F 3F ZF 

29 60 20 6D 

I 2D 2D 

1 138- 3F 3F 3F 2C 2D 2D 

1140- 3F 3E 67 20 E3 3F 

I14B- 49 09 23 FF 20 2D 

1130- 3F 3F IF ZB 2D 2D 

113B- 3C 3F 3F 3F ZF IF 

1160- 20 2D 20 2D 2D 23 



130- IB 3F 



09 2D 

6D 49 

2S 2D 

3F 3F 

20 2D 

2D 3C 

3F 3F 



3F 3F 
2D DC 
2D 3B 



C8 20 

3F 3F 

2D 20 

20 2D 2D 2D 20 2D 3C 3F 



1180- 20 20 



3C 



2D 


2D 


20 


2D 


TTt 


V 


3F 


.IF 


3F 


67 


79 


2D 


2D 


3C 


3F 


3F 


:r 


3F 


UO 


20 


in 


7F 


ze 


67 


07 


OO 


49 


«• 


09 


Tfl 


-.'(> 


2D 


3T. 


3F 


-JF 


IF 


ID 


7D 


7D 


7C 


IF 


3F 


IF 


28 


2D 


2D 


70 


?n 


JC 


3F 


3F 


3F 


V 


V 


28 


2D 


2D 


::n 


-.•D 


2D 



1 1F(]- 

1200- 
1208- 
1210- 
1219- 
1220- 



■ 2H 2D 

■ 3F 3F 
2D 2D 

■ JF IF 
20 2D 2D 3C 3F 3F 

■ ZF 7F 3F ZF 2C 2D 

■ 2D 20 2D 2D 20 3C 

■ 3F ZF IF 3F 3F 3F 

■ 20 6D 29 20 2D 3C 

■ OF IF 3F 27 2D 20 
12 12 08 IB 
49 C9 23 FF 
20 4« 43 33 
02 81 41 DO 



ID 4D ' 

3F oo : 

12 26 < 



3F 3F 
6D 29 
67 2B 



#*V 



%t 



HOME 
I POKE 103 
16304,0 



1, 64 1 POKE 



I J "BLOAO CARTES 



POKE 232,0i POKE 2J3,l* 
ROT- Oi SCMJE- 1 
PR1MT CNR* (4>|-RLM BCLOTE J 
K COF^TOIR" I 
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z%* 



980 GOTO 979 

901 PRINT AT 7,9, " 

yCNU fl MCNER UOTRE 
0U,R LR BR3C ■ 
5 PF.CU3 fiUKC LC8 
iERwCS fiU MCROS 
AUIRR.MCDRILLE) " 
989 PCJIKT AT 8,11; 



I0U5 eTCS PRR 

UCMICULE JUS 

ou uous rre 

M0NNEUR3 at 

ICRMPRONCC 



019 REM tBOUCLE; 0»* immid mi 
011 IF 8-2 THEN OOTO 01* 

aia let B-6-1 

014. PRINT ST A,S;"t-e - ; RT fl-1, 

¥i?»fc""' 

810 PRINT AT 3l,J+0; ■'■■I"; AT 90 
"; AT 10,j4ia; " <O0K>1 A ; AT i7,J*Ta 

'MPK 



KEN OOTO 999 



990 MK __ 

993 PRInT^Vt ai,13;" 

903 LET M-0 

908 LET ■■S 

980 PRINT AT at,16;"L" 

907 LET A-98 

910 REM *eOUCLe;84««fl»««4«»4« 

911 IF M-l THEN OOTO 013 
915 LET B-B*l 

914 IF INnr/9-"8" AND n>-ia THE 
N LET M-l 

,990 PAINT AT A,S;" 0-«";AT A-l, 

' iNKeYi•■■8 ,, THEN L8T SC"5 

ANO 8-18 THEN 
3)12 THEN OOTO 938 

'•-•; "iAT 10 
ib OgiP_980 




1003 NEXT f 

^11' L ?T SC-9C-l<t 

la T? U ? c<a THEN LET 5C-' 

10i0 IF" 4-0 TMEN OOTO 390' 

1090 PAINT ~ 



i-0 TME 

. 1INT AT 1 
1030 PAINT AT 9 



35 OOTO 934 

it 88!!* WS.. 





'IL CBrflOuE" 

I l^.jyHnuTBFMj 



30 TMEN PAINT AT A*l,l 
19 THCN PAINT AT A. 9,1 



> y r A< 
miTf ■>< 

3 hrj5rS-i|« TH,N 00T0 "' 

j?I **JNT *T 17,18; '^— ■■ 
X?8 pIinT*6t 18, i-l;" •-•"; 



90 BAND U0A 133*8 

49 PRINT AT A, 18; -/(:■', AT A-l, 

PRINT AT a, 17; ,, »C0AEl , -;3C; " 

PAINT AT 8,4; "L .ENDOMAOEMEN 

UOTRE UEMICULE A ATT 

jL im _fifif oyE. 

6H7 :; rflT 'il 

438 ' pfl^Pi 

048 IF IHKEYta-'N 

•M IF INKEVI-'O 



> TN«H 9CT0 Ml 




AT 1,39 



I; '■ (0/N) "JAT 1 
■•8";AT 1,98; - 
TMEN OOTO 399 
TMEN SOTO ai9 



30 



ERRATA pour ZX 81 

Nous publions dans co numoro, 
los premieres lignos des pro- 
grammes sur ZX 8t supprimoes 
par erreur, parus dans le nu- 
moro special du mois d'Aout. 



3...T0UTES LC3 LIGNES OE REM SO 
NT INDI5PCN3H0LE5 OU FONCTIONNEM 
ENT DU L0G1CIEL. 
3. . .LDIR X30 




^Jlooiciel 

4 aem copyright mors 1904 

5 RE" OeCRQIX fOBRICC 

? sis ?«,sa- T Kg^Ig* 



PARC FANTASTIOUE 

1 REM pM r 

OBSTACLE 

KxxixB5CxxxSx5x8xx X xxSxSxxJS8xS^ 



? " ?X0? 



Ei% 



ICMEL 



COFtSAIRE 

i flfn FtAnlC cm**»l»»,'Xx 8)1 10m 



NIZ80 



.- -Vr COUP* • WON* • 

In CURSOR. 76,2«PRINT"I" 

. :ronsm f s rr.?4 



r o tii ■■■■ 



•=r-4'C" 



rMEXT 

nci CNMOR+J :NEXT 

-?• THEM K-KH:|C:(T 
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-,w« pc^ , ,--... . I'trdiMbtvr d» .- 

«.uw ri» i«i n> *.:f'h i^-iiitxr i 

r.i i ■ |. i 1 IRI 11 • HMfef 

HI; H4fWi:F^M 

.... Ml || QR .- .2IPRIK1 

mf 1 1 eetBSH • * _,*t -i~- ■>-•- 

■ i! i ro *>D*« n i e:HF.I UiFOR 
tl >i n«t h 7400: rem : 
^-^o fop f l -1 TO i:fl ■ i| -Omif: t 

-.- 14 IFM • -..|la > 

■ ■ .. r } ,.;!-. .1:1.' At Of ■.-• 

- tl < 10.1 m THEN 3790* REM (FPU 

hi to S*IF D4<J1>-1 then r-p=r-E. 
•.*•& ro*- n TO ■ ■: if" r ■ * ■ ti .-i iHEN DC-OC* 

' !t*N 7400:PEM | 
-.4"»0 OP--0:FpP lt«t| Tn .»; IF <04< H • I 

r>B i ihtii 9086 

01 FOR II = - to -i; if (f>4< 1 1 »I>-*<D4l 1 1 ■ 
- .-,-. |f (i -i then 9900 
. ,. ■. i ii -. ro 6*w '("--»' ii '■ =i ■••t>4- M ■=?■- then dd-OD+Ishext n 

3590 IF ■ 0E- 4>*><OCO4»'CO0O4> THFII 3790SFEM CK*I 
9410 IF fp»»*>*fD4'6>-I> THEM t>F-6:G0T0 3730 
. |.f.-.4 '-'0-I- | .-1 • THEN OF=l:8OT0 9730 
--f> FnR i| = 2 TO 3lIF D4'I1>=I THEN IOTT Jl 
-.73© PF-J1 

3730 FOR Jl-1 TO 5i IF D<Jl>-Of THEN Dl < Jl >-H SOTO 73O0IREH nil«M 
37*0 NEXT JUDF-OiFOR Jl-1 TO 61 IF D4<JI)-2 THEN DF-JIiQOTO 3780 
*770 NEXT Jl 

3730 FOR Jl-I TO 3»IF PCJ1>-P F THEN Dl < Jl >-l iQOTO 73O0SPET1 lulim 
3783 NEXT Jl iQOTO 7398IREM GBHBBt 
37?9 REM * fool * 
3300 D8-0:[>C-0"DO-0 

3920 IF PCll.IXM) THEN 6248: PEM WMM ^Bmiliaill 
3930 FOR 11 = 1 TO 6HF D4<Il>-3 THEN DB-3:QOTO 3918 
?«90 NEXT II: IF OBOJ THEN 6900 

3919 FOP Tl -1 TO 6: IF D4<:J1>=2 THEN DC-2J60T0 3978 
■V»49 HE'^T T 1 ; IF 0CO2 THEN 6800 

6000 DB-0JFOR Jl = l TO 6' IF D4(Jl>-2 THEN DB»JI=6OT0 6060 

6030 NEXT II: IF I'P'0 THEN 6240:PEM SB^BKaMOtBOK^BEtJ&ID 

-.060 DC*8:F0R '1-1 TO 6i IF tD4( Jl )-2>*< JIO0B> THEN DC=*J|:SOTO 6128 

$990 NEXT Jl=GOTG 6248SPEM ItMMBMMMMMMJnBKII 

•MtO FOR Jl-1 TO 6: IF D4<TJl)-I THEN DO* Jl: SOTO 6130 

6130 NEXT M 

6130 FOR Jl-1 TO 3: IF D<J1>»0© THEN CI f Jl ) = I : GOTO 7300:PEM IXMHFU 

6218 NEXT Jl 

6248 REM « 7 d-* d* 1* ■-*« v*l«w • 

6278 DB>0:DC-0:DD*0 

6300 FOR Jl-1 TO 6= IF 04(JI>>=2 THEN OB-JliGOTO 63*0 

6 339 NEXT J1:G0T0 6960:P£M 331K3TX 

6360 FOP Jl-1 TO 6: IF <D4< Jl > >-2>*< JK >OB> THEN DC=J1:G0T0 6420 

*J98 HEXT Tl 

64-n IF 'C4'De'>*0-*<DC>>#(P<OB, I>»0> THEN 6318 

6438 IF <P4<DC>>»04<DB>>«<P<[>C, I>=0> THEN 6378 

6460 IF 'C>4<DB>>-2>*<PCDB, O-0J THEN 6510 

64?8 I? 'P4<DC>>-2>*(P(DC.I>=8) THEM 6578 

6380 GOTO 6630 

6518 FOR Jl-1 TO 5i IF t>< J 1 X >DB THEN DKJ1>=1 

654fl MEXT M:fiOTO 7380 = REM II II III || 

6578 FOP Jl-I TO 5MF D<J1X>0C THEN DKJ1)»I 

66<>8 NEXT JHeCTO 7308 :PEM Hi — 

6630 IF < , <D4<DB>-5>*C04<:DC>b3>>'«"P^13, I> 



i-O THEN 9^88 



2128. 12148 



■:■-■■:' . ! -.o^iOOTO 
-?-0 PEM • C—m rt»l»rt» • 
gg69 FW '2-I TO 13i IF P* . 

■ 78 HE i F7 
8973 Dfi*IJ<jOTn ^S^O 

rtSOO O12>S0SUI IJ3O0:OH C G03UB 12100 
0. I2T60. 17T-0. 12:oo. 12^28.12340 
9881 IF DG-1 THEN r-r.-OiGOTrj 9900'PEM 
3883 IF DC99 THEN P'C. n-81003'JI' l"300:GOTO 8870 

■"-^OO REM * Joo«w WfvAfit * 

5910 CONSOLE " H,24*PRIMTCHR»(6>I"J* cho: 

0920 ON r Q08UE L1820. I1040»110«0i 1l000i II 

9938 CONSOLE S 3.21 

8940 PET'^Ptl 

90"O PEM » 'if d» partiv • »••** 

^ log FOP 1 = 1 TO S>0< D-HNEX1 l!003»/B 1I000:REM 



9120 CONSOLE 5 5,24»PRIHTCHR»(S>| 

1-140 FOP 1 = 1 TO 19JF0R 1-1 TO IU»l:PPINT 
= ^0:FOP J-l TO N 1 4- 1 i PRINT ll'l. I> 1 1 NEXT J: 

91££ FOF 1=1 TO l|i:f.F = n;ri,i 1 ty?3>JV 11820. 
^,,1 d" cur«*ur • 

nee for 1 = 1 to 6 

9190 CIKSOR CH.6*PaiNT HH*'I'i 

^288 IF p/I.I^bI^ THEN P<J»r>*>0 

9220 0E"0G*P< '- 1 1 

9240 "EXT J 

9260 P' I 4. [ -=-■ E: IF DE =6- THEN CIS, I > =31 

K g DE 9 

9308 FOB '=7 TO 19 

9320 IF P'».I>-99 THEN P'J.I1=0 

^•340 rjE-OEtP'T. n 

936« NEXT J 

-.:,-■ p. 16-1 UE 
1-420 c'jp-;of CHu.rv 

M40 r ; '"' tr ." = 1 TO 6 
'•460 BOSUB 1300 




.»<!, J>j:ltEXT liPPINI Ltf),7>»NFXT 

•RltfT Lt'I.7>; 

1 1848. 11360. llSftO.ll'aOOJPEM • - F-o* 

9400 ..-f: t 1 

9300 r>14i00SUIi 90OO 

9520 talSlOOSUS 9800 

7 TO IT 



= 16:iV>SJ.IC 10TI9 
XT I 



9020 

^48 rift-sr*- o. f>: PE T> Ktl 
--.(«• IF P^ I.I 100 THEN PPINT- -: 
9320 IF I I.I- in then PRINT- -: 
1040 PRINT P'I.I-::IF cv=24 then 9&«o 
<iS60 rwacw»i:njpsnp. CH»i.rv 
>EtfF. cetijpn 
9999 FiK- 



«r>*> touch* P<wr coxtir«iw.-:fi06IIB 10200) REN ' 



10780: IinjT NOCGOTO 18180 



6660 IF "D4'OB>-4>*'f>4'OC>=4>)*<«:P-'I2,i: 

6690 SOTO 6788 

-;7?0 FOP Ji = | TO 51 IF POD QM THEN Oir. 

6738 NEXT Il:l50T0 7388:PEM IEBR31 

67K0 IF -"&4C0B>=3>*<DB>3>>*(<D4<DC>=3)' 

6818 SOTO 6969:PEM JJMOll 

6348 IF OB-3 THEN 6900 

6378 IF OC-3 THEN CB=DC 

6988 FOP Jl = 1 TO 5:1F 0«.JI>ODB THEN DJ <. 

6938 NEXT H:»50T0 7388:REM IHW B J 

69*0 REM - ~., Min • 

6990 t>F=0:[": =0:00=9 

7820 IF P<0, I><>0 THEN 71 10 

7838 FOP Tl -I TO 3-IF DCJ15<4 THEN CjIOI. 

7838 »'EXT JUQOTO 7300:PEM JUJifJ-Ji 

7110 IF P'7. I>'>8 THEN 7260:PEM 

7140 Frrp Jl-] TO SsOB-OB+C-'J] >:HEXT II 

7ITO IF '[.■*. 15'*' 'CB<20/*"De'P<e. I>>* 



-(P<12. |}«0>+<P<9, 

■<P(9, I>=0>> THEN 



THEN 7408: 



.720 



IDC>3>>>*^P^9.I>-8) THEH 6840 



r-/P>8 FOR 11 = 1 TO 3: IF DCII1 
7?'8 NEXT riiQOTO 7:;80:pfm 
7260 Fi'jP li-i TO 3>DKJ1>«1 



B,I><>0>>> THEN 7480JPEM 1 
3 THEN &KJI)»I 
NEXT JHOOSUS 13600 = PEM * - avant -i^ r» 



:COH30LE 3 22,24i 



■99 THFII f 



C*I>*0 




=99 THEN P^C. I> 



*9 THFN 



,:(,r,-n| 



"I m I 



7300 CONSOLE 3 22,?4:PPrNT1HP»r6>;-J«. r*joo<? l^s d^s"; 

•>30 FOR Jl»| TO 5: IF Dl ' M )-l THEN PRINT Jl: 

7360 MEXT Jl:PPINT:wyjB I04O0:PEM * - b,.,*,^* 3 - 

: -.:. piexT 1 

7408 PFM * .-*** > lt-<.iair * »***«***♦*****•••***♦...-..... 

7300 rrtf=JXE 3 0.4:CUR3OP 77, 2:PPINT-0- ;: CURSOR 76,2: PRINT 
cPiHTCHP*'' »l 

7330 r,r^.ijE J3300:PEH * - prw*r»t.lon *■* c*lcu1 oVs P^int* * 

7-^60 PEM • cult* - 

7>^oi OieHF P'I8-I>''>9 THEN 76^e:PEM JT0V1 

7020 liO'^JB 12230JPEM * * cilrul ,j*s c«5lr.»:i *= IF P'C, I > =99 THEN P'C 
~"c*:cmo 7680: PEM J TPW 

7^90 RE« * -J»« * 

7710 C-n:lF P<Ctl><>0 THEN 7800:PEM 

77-10 ryyyiB |J348:PEM - » c*1ci1 Ilea 1 

39OO<0Or0 7300: PEM 

7770 SOTO 3^08: PFM 
;t.pc. PFd * car*-* ♦ 

-t;T0 C = I2:IF PCCrDOO THFN 79?0:PEM CCC91 
7060 000UB I2370IPEM • 4 CtltiUl <»*« points *: IF P'C 
-^*.tr;r^.TO 7--7-0:PEM 
BOTO g900:PEM 
79^8 REM * l*ool * 
7930 r-H! IF P'C. I 

7980 aoouB tzsea 

~'.pr.:r,OTO 8049 = REM 

SO |0 GOTO 8980i 

&0J0 PEH - 3 'I-s 

g070 FOR 11=1 TO 61 IF fM-IJ 

3100 NEXT IIIGOTO 8280:PEM ■■ 

8130 IF P'C-I''>0 THEH 9I90:REM 

3168 ON r ryysJjfi 17190.12120.12140.12168,1: 
lOOTO 3988: PEM ■nE4«E«mmmV 

8190 PEM * hr.i.r. «• 

9228 C-91 IF 'P<C, IJ<>0>*<J1<4> THEN 82O0IPEJ1 WM 

3238 GOSIJB I2260IREM * + c»levl o>« point* *"Q070 09O0IREM 

3238 PEM * »»x * 

3310 C-0IIF P'C,I>'>8 THEN 8400IPEM Ml 

-.-in BOgUS 122401 REN * • c«lcul -J»m POlr,»» *l IF CPfC. I >-99>*<P<C, I ><20> THEN PT 
r.T>«0!GOSIJB I3308'8OT O 94001 PEM — 

9378 GOTO 89O0IPEM BBWHMnHOHBi 

0408 PEM * aln • ^^___^_^^^^^^__^ 

S4T0 C-7: IF P<C,I><>0 THEN 0328IREM «IHMDIIitlMI 

8460 G03UB I22201PEM * • c»lc»l d*« PQlnt» *' IF <P'C. I > -99>*'P' , C. T 
C,I}-0I008U1 r;380:GOTO 9329' PEM W t3iim^—^B»t^im»TOBBni 

3490 GOTO 3900:PEM HVJ.J>JOMJUUU>l 

F.328 PEM - 2 4*» d» U mm* valaur * 

8330 FOR Jl-1 TO 61 IF 04<J1 )-2 T HEN C-JUGOTO 8618 

9330 NEXT JKOOTO 8679:PEM IVTmi 

.40 oil r. r,ri3UB I2180, 12120. 12140. 12160, 12180, 17280IPEM • * C»lcul 

. . .. reh * I*i 1 • 

8700 C-liIF P(C(IX>0 THEN 0760! PEM HW 
■:"f 'I'p'iOIi 12100!PEM * - ^Icil T»s Polr.ts *:GOT0 3988IPEM BRJJMBB 

0760 REM - 1m 2 * 

8770 C-2: IF P<C,I)-t>0 THEH 3798: PEM IHBTJTUn 

800UB L3120tRSH * * <:*lcui <*»» Points *iGOT0 3908:PE 
?T i =0 PEM •> )» *.jIH- * 

• IQtlF 1 •' . T ■ 9 THEN 9820IPI 
3310 I'E-99iP<C. l>-99!GOro 3900!PFM 

C •■■ REM * r« .j»»* » 
9930 C-13UF P<C.IJ'>8 THEN 8838:PEI 



1OO00 PEN * ■-■"- crcir-nw: 

10020 PEM • contlnuvr • ** 
ie040 CURSOR 0,23»PRINT , T*i 

10060 SET mmisif Mlil-~- THEN 1886< 
9000 RETURN 

18100 PEM »■ out ■*> wn * ■»■■■ " 

•9120 IF M0*»*o" THEH r«=l:PETURN 

10140 if no*>"r." THEN HO-2) RETURN 

10168 PPIHT"o ou n s.w.P. "i iGOSUl 

10200 PFM * -..,- I-..— 1 * ... ,.•..•.■ 

19228 TEMPO 7:mj3IC "+B9" : PETURN 

10300 REM * m»i<m> 2 • ...-••..•■ 

19320 TEMPO 7IMUSIC -*83-t/«TiJ«N 

19408 PEM - ikii1«* 3 * *> 

13429 TEMPO 7 1 MUSIC -*F8-IRETURH 

11080 PEM • d*s»ln d* 1* viltur d»» tf»* - 

11190 CURSOR 9. HPRIHTVl«<D(I>>i ICURSOR23, H PRINTVI*CD<2) > I ICURS0R30. UPRIMTVH 
TD<3>>liajR30P53. IIPRINTV1»<D<4>>| ICURSOR69, 1 1 PRINTV1 »<Dt3>>| 

11120 CURSOR 8,2:PRINTV2*<CK1>>1 1 CURSOR23, 2iPRINTV2«C0(2>> I 1CURS0R30, 21 PRINTV2* 
'0''3i>;:CUPSOP33,2iPRINTV2*<D<4>)|iCURSOR68,2JPRIHTV2»':D<3>>t 

11148 CURSOR 9,3iPRINTV3«<Dtl>>;iOJRSOR23.3iPRINT\r5*<D(2>>1tClJRSOR38.3:PRINrv3* 
<:0<3>>;:ClJPSOP53.3:PPIHrrf3*<0(4)>liCURSOR68,3iPRIHTV3*(D<3>>1 

1 1 160 RETURN 

11298 PEM * l*t d*s o>s • ....».....•....*••••.•»*•.••*»•.•»•••.*-............ 

11228 CONSOLE S 0.4IFOR II-l TO 3 

11249 IF P1<II>-1 THEN 0CII>-IHT<6*RND<1^>*1 

11239 GOSUB U900:REM * • de*»in d* I* vtltur 4*s d>* * 

11269 NEXT II 

11230 MM=PIID<1 1: IF <MM<.3-F)*<MM>.3*F) THEN 11220 

11300 C0N30LE S 5. 24* RETURN 

11489 f?EM * J#t di-s d-» d* I * 01-d i n* t««r • ••*•-»•»-*•-•-**••••••••.•*• 

11428 0-INT<3-RNIKl>JiF-. I :MMI--«K^*nn4»cnt-: IF D< 1 THEH F-. 2: HH»--dou<r«-nt " 

11449 IF D>1 THEN F*. 83: MMf-"f ort - 

11460 PR INT -Je l»nc» In d*s - ;MMf ; " . "iGOSUB 18480IREM • * Mtlfif 3 • 

11-139 RETiJRH 

11509 PEM * tr*lt«*wnt d»» »x l*qgo * ««••••••«•••*•••••*••*•»•••.• 

I 1 399 RETURN 

1 1629 PRINT NJt<[)t 

11649 PRINT " ltn>z* 1* o> < dou '-*«•* n t "0*. ■ovtnntiM'nl: 'H' Ov *ort *F*>. B | 
11669 GOSUB 10300IREM * * ■■■■■. 1 ■;■■ ■■ 2 •iGOSOB lfWV.OcPFM . • rooti"i«-r *:PPINT MM* 
11638 I>'fi-5C<MM*): IF 'D< >100>*CDOie2>*<[>-' >1«9> THEN PPINT-[V«.'-«^»*nt -r".»oy#rtnv 
»*"t "M- ov (or*. 'F" s.w.p. .'iiGOTO 11660 
11700 F-.02:IF D<I0I THEH F-. I 
11720 IF 0-183 THEN F-.03 
1 1720 PETURN 
11890 PEM <■ position du crior * ......,..*.......*. ..**.*... 

.■< 1 11 ■ [7> cv*eei RETURN 

I 1040 • n-43:C'J-O0t RETURN 
11369 I-M-33ICV-09IRETUPN 
11880 CH"6l:CV-99:PETITPH 

■ I'-.ttfi ■ 11 ■ 9:' ■■ •' ::-;■ n-r-M 

1^900 PEM + C»lcu1 d»» Point* * ..•••..****.... .^..... 

• :C.£.= ! ! GOSUB 1 ?4O0!PCTUPN 

*iDAj-2i808UB 124001 RETURN 
•>Dfi-3tOOSUB I2400!RETURH 
**0ft-4iG0SUB 12490lPETi»N 
•iOft-3: GOSUB I 2400 : RETUPU 
*:f>O-6i00SiJB 124001RETFPPII 
r. * 1 GOSUB 1 26001 PETUPN 
flSOSUS I 2600! RETURN 
»l*r. *lDB-3iOC-0i&F-20iQOSiJB I 2900 s PETURN 
it* •:OF-20!GOSUB I33801PETUPN 
ol *!0B«^:(«: = ?:r>F. 39: GOSUB 1 29001 PFT'JRN 
rrc *1DB-4:C>C-0:OF-401GOSUB 12900SPETURH 
n,-, ■:r-n-3K>C=0:OF.38!GOSUB 12980:PETIWN 



12189 PEM 
12129 REM - 2 
I2M8 REM • 3 

1^169 PEM * 4 
I21C8 PEM * 5 
12/99 PEM * 6 
17229 PEM • * 
12249 PEM * m 

12260 PEM * t>» 

12299 REM * *• 

•?-00 PEM * (, 

'2328 PEH » O 

12349 REM * ;. 

12480 PEM 4. 1 

12440 FOP l_L»i TO 9 

12460 IF P<LL)-O0 THEH 0E-DE*1 

12430 NEXT LL 

12500 0e-OE*OfllIP OE-0 THEN DE--^ 

12529 P'1.I)-DE 

12340 RETURN 

12690 PEM * min - H*X * 

17640 FOP IX-1 TO 3 

12660 I>E-t>EtC'<LL> 

I 7638 NEXT U. 

17780 IF r-9 THEN 12320 

I 2720 IF c-7 THEN 12760 

12748 IF C-3 THEN 17808 

12760 IF <P<0. I)<>e)*-:f>£>-P(3, I)> 

12789 GOTO 12820 

. S00 I' ■ P'7. I>' <Q)*'0E<'P'7, I>> 

12329 Pi-C, I I4^)€ 

I2340 PETUPN 

12900 REM * br-)»n - fool - wrrt 

1 940 FOP LI. -I TO 3 



CAMCTGRES EM VIDEO IN 


VERSE 




5319.. 


. C«5E H CNOISIR 


5370.. 


- FOOL 


5460.. 


.■-:■- -*..-.;- 


■ .■.■■- 


. REJOUEP 




. REJOUER 


5705.. 


. KEJOUER 


53*0.. 


. tCUX DCS « LM 


MEW 


rlrtLEUR 




. CflSE ft CMUts-lR 


«3O30.. 


. DEUX KS DE LO 


N£ME 


r*LEUR 


6090.. 


. DEUX DCS D£ LM 


HEME 


VflLEUR 


6180.. 


. REXiUER 


6330.. 


. MHX MIN 


6540.. 


. REJOUER 


6600-. 


. REJOUER 


6630.. 


. CRSE fl CHOISIR 


6750.. 


. REJOUER 


6010.. 


. MfiX MIN 


6930.. 


. REJOUER 


.••■•■.. 


. REJOUER 


7110.. 


. REJOUER I0US L 


ES D€S 




7178.. 


. CH>E H CHOISIR 


723U.. 


. REJOUER 


7590.. 


. TflNS 


7620.. 


. YRnS 


7650.. 


. JOUEUR &UIVHNT 


7710.. 




7746. . 


. CHRRE 


7770. . 


. JOUEUR sUIVmNI 


7830. . 


. FOOL 


.■„■ 0. . 


. FOOL 




. JOUEUR SU1VHHT 


7?50. . 


. TROIS DES DE L 


M HEME 


VHLEUft 


7980.. 


. TR01S DES OE L 


H HEME 


VHLEUR 


8019.. 


. JUUEUR SU1VHNI 


8100.. 


. MRX 


8130.. 


. BRtLMH 


8160.. 


. JOUEUR SUIVHN1 


8220. . 


. NOX 


;.-.,,. 


. JOUEUR SUIVHMI 


110. 


. MIN 


8340. . 


. MIN 


■ ■ 170. 


. . INI.it. <>■ ...HIVl'NI 


8430.. 


. DEUX DES It Lh 


MtMt 


VHLEUR 


&460. 


. ('tux DCS DE Lfl 


ME ME 


VhLCUR 


8490. 


. JOUEUR SiilVuNl 


H5H0. 


. LES I 


8610. 


. Lt*. 1 


8640. 


. JOUEUR BUlVflHI 


0700. 


. LE& Z 


B7». 


. JOUEUR SUIVtlMI 


8770. 


. Lfl SU1IE 


.-. 'i. 


. KWEUR BU1VBN1 


OtfOW. 


. LE VftHS 


8810. 


. JUi.tUR 8UIVRN1 


:■ ■■ Jit. 


. ■ it 1 RESTmHTE 


;.! <4l.i. 


. 1 EUR BUIVIW 


8901. 


. lot 11 « 1^ BUIVRN1 


8890. 


. JOUEUR SUIVAHI 


1 17 in 


.. NtXI Jl 


1J790 


.. NEXT Jl 


1 .'820 


.. BRELfiN 1 tf-M 


YBW 




1 ■::■■• 


.. NEXT Jl 


1 ::<I0 


.. RETURN 


MIJUO 


.. RETURN 


1 4 1 80 


. . M It"- II 






THEN D£"99 
TICH DE-99 



1 60 FOR Nti-i ro ) 

i '?-m if r > 7 <- r * ■ . 1 - B IHl H V. 

11000 IF T'fl L}«02(HM| I • TUT 

2)+|!GOTO 1 3040 

1 ■', >:t mi 

: 11 XT 1 1 

1-060 FOP NN-I T.l -. 

IT089 IF 02'HI.7 ■■>'I.-H TUTU D| .- 

13983 IF Mi I M '■■ 

I ■■■ MEXT l»l 

II ■ . POP Htl-I TO S 
■ 11 -t II |r.'-l»l./. F.t 11.. 11 1 ■ 
1-1 10 IF DC-99 Tl*ll I (140 
13178 NEXT UN 
I 1 10 F.i -■-: [I ..-II INCH 1320O 

1 j. a it on- ■ • i.m N 11 M 
; -inn iyiTo 1 -,??o 

1'.2O0 IF '0B-99'*'frf:-''1' THEH l-C-OT 
V3220 IF <C-9>*<DC-OF> THEN OC-OiOOTO I 
REM • *ln - »»»• * 
1 40 P<C. I>-DE 

13260 RETl.Wt 

13300 REM • suit* • 

13340 FOR LL-1 TO 3 

13360 03<0<Ll-)>-I 

1 3380 NEXT LL 

1 340O OE-99IFOR I.L-1 TO 3>0B-0»»03(LL)U«.yT 11 

13420 FOR LL-2 TO 6iOC-OC*OS<LL)»Nr /! It 

n448 if (DM»(DM1 then or-DF 

1^460 pi-C.I>-0C 

13490 RETURN 



1 2M0I 



THFN P' 



1 1329 
11, 1 >-l 
1 3349 
1 3699 
13620 
13640 
13639 
13669 
13678 
13680 
1 ■- 90 
1 3693 

13700 

,: 

13760 

1 ■.■■-,, 
13020 
13030 



REM • 
1 3040 
13100 



PEM " 

r<9-0:DB-0iOC-0i!>E-0iDF-l 

HP2Ml,2>-0iNEXT Jl 

PETURN 

PEM * tvVint d* rmSo>i+r •-■>/» !*• d«* * MM 

IF P<9.1'">0 THEH 13780 

FOR II-l TO 6HF D4(J|>>! TICH 13660 

NEXT JHO0T0 13700 

FOP I2-I TO 6UF <D4(J2)>1>-<J24:>J1) THEN ! 

NEXT I7i IF 12-7 THEM 12-6 

IF <J2>;i>*<04'!2>>1> THEN JI-J2 

FOP I7-I TO 3t IF f>' I2'-ll THEN OIM2>-n 

NEXT I2I00T0 14240 

FOR" II-l TO 13 STEP I 

ir p<ji ( ixxj tiifh 1 .1,'iit-t 1 a inuni 

IF ' Il'7>f <]'■>? •' M ■! 1 ) THFII H370 
GOTO 147101PEM Z-mMFll 
IF II ,6 THFN I3140IPEM 1 
II 04(J| -o THEN M7I0IPFM 1 



CURSOR e>23iPRINT"Vowl«S vouj l» 

.,...- I..". I .!',ll .Hit lmv,n;pl 11 . . 

If mmi' I - ©" mi n n rURN 

PFII • i„-.,.nt.tlon d* l"*CT*B * ' 

rop i- 1 to 3ir.'' 1 .-iifif 'i 1 

CON "i ■ t 4t PRINT CHR*<0>|lROR 

* d***ln '1* )• -...l-lir- rj*l dw« * 



13980 FOP J2-1 TO 3i IF P<I2>-J1 THEN DKJ2>-0 

|-.'MO l«;:l I2JGOTO 142-Kiil.f ft mvm 

13040 FOR Rt»l 10 6 

1 vr.-n |p D4(J2»I INEN i4ii'o 

Mono i«xi !7irrfiT0 1 42491 RIM nnni 

14000 fop 13-I TO 6 

11060 IF <r-4< IVo|)*<I3<>J2> THEN 14120 

1 t :: II t'--,* IHl 11 1 ■ 1 
14120 IF 1 '. 12 fix H '■ ■ ' ' 
Ml"." I rip 13*1 "> Bill I" '".'-'.- TICH 01 ' 11 •-« 

1 4 MM) h 1 '■: 1 » 'HUMM wiormt 

I49I0 H0XT M 

14749 Pt.IiiPII 
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LE LOGICIEL 
DE LA SEMAINE 



PETITES ANNONCES GRATUITES 



LES AVENTURES INTERNECROPHILIST1QUES DE MICHE ET MICHA. 

Necromancer de Synapse Software 

sur COMMODORE 64 et ATARI 




"-Salul Miche. t'es pas trop 
bronze pour un vacancier! 
Taurats pas passe les vacan- 
ces dans un tonneau? 

-Merci pour I'enchainement, 
Micha. Non je les ai passees 
au Royaume des Tenebres. 

-Tu dois bien etre le seul a jouer 
par la-bas en plein ete... 

•FAUX!!! Puisque Ion est en 
train de jouer a deux dans la 
salle de redaction. J'ai pas la 
peche. 

■Forcement. tu detruis les ogres. 
mais pas i'araignee. En plus, la 
moitie de tes arbfes agonisenL 
Tu paries d'un druide!. 

•Sous-entendrais-tu que detruire 
les ogres me fait perdre des 
forces, tout comme I'araignee. 
a moins que je la detruise? J'ai 
vraiment pas la peche. 

-Bon. laisse-moi la manerte, je 
m'occupe de detruire les larves 
d'araignees. Tu ne m*as pas 



laisse trop d'arbres en reserve. 

-Ben qu'est-ce qu'il te faut! 
Vingt-sept chenes, tu as large- 
ment de quoi faire peter toutes 
les piles du pont. 

-OK, mais, ne te plains pas si tu 
te retrouves face a des dizaines 
d'araignees zombies, sans ou- 
blier les morpions qui te suce- 
ront I'energie sans faiblir. 

-Eh, on leur parle du concours 
Miche et Micha... 

-ChutL.Tu detournes la conver- 
sation, surveille plutot le necro- 
mancien. il te prepare un sale 
coup de derriere les lombes. 

-Tombes sur lesquelles je dois 
passer pour acceder au niveau 
suivant, je I'avais pas dit ga en- 
core! 

-Dis-donc, Miche, fas vraiment 
pas du tout la peche. il te reste 
cent douze points de force... 

-Arrete, je suis vraiment naze, il 
me reste soixante dix-huit en 



force et I'araignee me 
course. ..Je m'epuise, je m'es- 
souflle et le Necro se reincarne 
a tout va. La vache, i! a au 
moins neuf vies celui-la! 

-T'es egoi'ste, t'es tellement 
creve que t'as meme pas 1'idee 
de me passer le joystick pour 
I'achever ce magicien de bas 
etage. 

Ca y est, ta force est nulle. 
A moi... 

-Non! Rends-moi le joystick! 

-Eh, c'est toi qui as pratique tout 
I'ete, alors laisse-moi m'entrai- 
ner! 

-OK, puisque c'est comme ca, je 
vais preparer le prochain logi- 
ciel... 

-Chut! C'est secret, la surprise 
la semaine prochaine." 

Miche et Micha 



VENDS lots materiel TEXAS 
suivants: 1X console TI99 + 
module PAL + Box extensions 
! + carte RS 232C: 5000 F. IX 
Box extensions + RS 232 + 
carte contr6leur + lecteur dis- 
quettes; 7900 F. Module Mini 
Memoire + manuel francais Ini- 
tiation Assembleur: 800 F. Ma- 
chine a ecrire Terminal, EP 44, 
interface© RS 232C; 4K M, tout 
texte: 2850 F. Lots indivisi- 
bles.RECHERCHE Term. Emul. 
II et Echec. Faire offre a Mon- 
sieur F1LIAS Tel: (3) 980 55 98. 

VENDS PHC25 + modulateur 
noir et blanc + prise magneto + 
documentation: 1900 F. Mathieu 
LAMBARD Tel: (56) 72 23 35. 

CHERCHE Jupiter Ace. Jose 
CORRAL 13 avenue Marcel 
BEYENS 59200 TOURCOING. 

VENDS Oric 1 48K Peritel (ga- 
rantie 6 mois) + 2 livres + 3 K7 
de jeu. le tout 2250 F. Monsieur 
JOVE Chemin d'essustia VILLE- 
FRANQUE 54990 SR PIERRE 
D'IRUBE. Tel: (59) 59 83 13. 

VENDS ZX 81 + 16 Ko + livres 

*jeux et programmation en Ian- 
gage machine" + 17 jeux sur 
cassettes + manuel program- 
mation Sinclair, (valeur 1300 F.) 
Vendu 900 F. Tel: (45) 82 73 
24. 

VENDS Ordinateur SALORA 
(compatible Laser 200) branche- 
ment sur Antenne UHF Secam 
+ une K7 demonstration. Sous 
garantie : 1400 F. Robert VI- 
GEAN(67)97 11 80. 

VENDS SHARP PC 1500 : 1200 
F. + CE 159 (module 8 Ko RAM 
protegeable): 700 F. + papier 
CE 150 + livres + malette: te 
tout 2300 F. VENDS interlace 
pour Dot Matrix Apple (permet la 
copie d'ecran graphique directe- 
ment au clavier): 700 F. CHER- 
CHE contact Apple II. Joel LE- 
MOINE 2 rue Albert Leyge Bat 
28 Esc.2 95340 PERSAN. 



ECHANGE modules "Echoes" et 
"Startrek" contre Module "Baste 
Etendu" avec manuel pour 
TEXAS INSTRUMENT TI99MA. 
Tel: 983 14 46. 

VENDS programmes ZX 81 
16K. Might Resolution: 70 F.. 
Fast Load Monitor. Assembleur 
(Artie). Phantom, 3D Defenders: 
40 F. piece. Fabrice BAURE 
Tel: (24) 53 34 53 (apres 20 H). 

VENDS Console CBS + 10 K7 
+ poignees "Super action* Le 
tout 3500 F. Prix a debattre. 
Vente separee possible. Mon- 
sieur HUE Tel: (93) 88 23 12. 
VENDS ORIC 1 48K + moniteur 
Zenith (vert) + manuel + Oric 1 
Pour tous + 2 K7 + raccorde- 
ment Moniteur Oric 1. {Valeur 
3800 F.) Vendu 2700 F. MOU- 
CHENIK GAD Tel: 808 37 64 
(de 20 H a 22 H 30). 

VENDS TI99/4A (10/83) SOUS 
garantie + manuel + cordon K7 
+ manettes de jeu + 2 modu- 
les: Munchman et Demon Attack 
+ 100 programmes sur K7. le 
tout 1900 F. P.MONTES 4 rue 
de Champagne 95200 SARCEL- 
LES. Tel: 419 37 11. 

VENDS T07 + livres + Pictor 
+ melodia + gestion de budget. 
Possibility achat separe. Prix 
tres interessant. Monsieur 
GOREN Tel: (3) 987 40 33 
(heures bureau) ou (3) 993 64 
91 {le soir). 

VENDS Multitech MPFII 64 K 
comp.APPLE (langage APPLE 
SOFT) et meme cartes graph. + 
nombreux documents + Nom- 
breux programmes utilitaires et 
jeux / lecteur K7 + int. impri- 
mante . Peritel (Valeur 4500 F.) 
Vendu 3500 F. a debattre. 
Pierre CROCHET 61 avenue 
Bournizet 51800 SAINTE ME- 
NEHOULD. Te!: (26) 60 84 78 
(le week-end). 

VENDS TO 7 + memo 7 Basic 
+ Un livre initiation + K7 de 



Jeux, le tout 3100 F GrHes 
CHAMBONNIERE Tel" (70) 99 
85 00. 

VENDS pour TI99/4A modula- 
teur PAL UHF (valeur 750 F) 
vendu 500 F, Tel: (76) 24 00 37 
(apres 18 H). 

VENDS ZX 81 (10/83) sous ga- 
rantie + extension 16K + ma- 
nuel dutilisation + 2 K7. Le tout 
900 F. Laurent PROKOP Tel: 
(23) 58 31 93. 

VENDS APPLE II + 48K, carte 
langage 16K moniteur vert 12* 
(annee 81) : 6000 F. Philippe 
GODIN 28 bis rue Lucien Cle- 
ment 95130 FRANCONVILLE. 



VENDS pour TRS 80 Impri- 
mante 32 colonnes QUICK 
PRINTER 2: 600 F. et la prati- 
que du TRS 80" aux editions 
PSI, les 3 volumes 200 F. 
Franck VANDEGINSTE Tel: 350 
92 96. 

ACHETE pour ZX 81 extension 
16K. Francois LECA, 36 rue de Bu- 
zenval 60000 BEAUVAIS. Tel. : (4) 
44848.94. poste 2901 (apres 
17H15). 
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ACCESSOWEST179/4 

Modutateur SECAM France 
CJtte liafior) rraqtnto-caaraeL 
P&e manetwijeu* 
Mageneto-cjsiett« compatible Tl 
IAN5AT avec compteur 
* tafc*e magneto compm 



Imprimante Sr*oiha GP 1 00 
rnurrface paraOMe eitfrteure 
pour TI/79 ■ GP 100 (ettemej 



PROGRAMMATION 

• Extended Baiic 

Memoire otrmttn 32 K en*ri*ure 

n LOGO II 

[eHeroion 32 K lndrsperr.a»e| 

Qd-JC par VJ-mtfTV 



i courj d* f abrtcatlon 

1.200.00 
n r ,.oc 



/•>•:* j 



i pmonnvflflfan 



OSGAMOATtOM 

Corse* rVianofer 
Genton Itchier 

GeWan rapports 

IMWa 
no* 

GeiBonprwee 

MOOULES EDUCATION 

"WdWon-lutrUracOon I 
Adrt0an-5ulr.t/acUon II 
AdrJtion-Canon 

OMMorMMmoHlori 
Early Re**ig 
Mcwor rru»U(*cjt»Qn 
M^OpftuOonl 
• Musk Maker 

MOOULES LOTURS 

Connerttaur 

MtficriMan 
Orr**3 

JcuivfcWol 



NOUVEAUX LOGICIEtS TEXAS 

RrtourpirM* | 252B0 I D I HOfVtt I 2SZJX) I O | 

Owncxi mueV 2ttjD0 D S*U« Vttk 2SZ00 H 

M«n 25ZO0 H Jaw Dff *kfr 2S2J» D 

Burger time \ 25Z00 | H | DCMin IMarW | 2S2TX> | n | 
Mtcroiurgron 



I47J» 
I47J» 

147J0O 

i*7M 

M7JXJ 
147J» 
M7XW 
20bJM 



20&JX> 


n 


• Pmn 


25200 


1 47.00 


n 




206,00 


147 fiO 


i) 


Jeuai vW*o II 




I47/XJ 


ti 


Jem Retro 1 


fflflO 


I47JW 


u 







LA REGLE A CALCUL 

sort une extension memoire 32 K exterleure pour la console Tl 99/4. 

Avec 48 K ram, vous allez reallser des programmes plus performants, 

utlllser le logo II (en francais). 




Moomweepw 



257.JX a 

252JXI Q 



PROGBAMME5 COLUNSTTEXAS : 

Introd. aun«/4|l) 

lnworJ.»uri9W4|7) 

Um (ectmlqurt rj« programmei de jria 1 1 1 

In VHTrirjjn On programme* de Jem |2| 

• an toun M r«*rt<j*kio 



MOOOGJCIELS JOfTA WAKE 

Tl rv I Onlc tlmpK K7 : 1 2 Jeu* 

n W 2 BaUc «nv) j : 1 2>eio. 

n Ruoh mct* Jeu d'«verturei axle, ftendu 



7SJ» 

7SXX3 
75,00 
7SJM 



ISOrjO 
1SOJX) 
70/XI 



MOOULES IfOMOX : 



I 390.00 j r 
I 310X10 I ( 



BASIC MICROSOFT NIVEAU S 

PRISE PERfTELEVlSION MEMOIRE 64 K : 



Mo 5 Uni» Cenoale ■ Prhe PEBITEL 

lecieur EnregBlreur de programme! Mo 5 

CfayonOpOque 

E«emton Mu^que et Jem \2 manetiM <je 

deplacemerrt permrtwnt la vtMon et ta 

IHUfell de kxmJ 

Controteiir lecteur de dHquettes Mo 5 

Imprimante Thermlqoe 40 cokmnei 

Monnrur Couieor pour Mo 5 Ocean* 

Logklcli i ur Canoochet 



MODULES FimrWARE : 




nthtmxiM 


2IiS/» 


(1 




285XX) 


1) 


Hen House 


285.00 


[ 1 


MODULES AW 


M: 




Pxtmn 


350.00 


1 1 


Moon Patrol 


350J» 


U 



Locjlcleluur Cute tin 
Multiplication! CaOMtH 
Uo mot pour le compte 



rjp-m.nuW la lltt* del loglclell 



PRIXTTC 




2 390.00 


1 1 


650.00 


I I 


200.00 


: 1 


600,00 





3.79O.0O 


i ; 


2 200.00 


1 1 


2.725.00 


i i 


295,00 


i . 


?95X» 


( : 


320.00 


n 


320,00 


1 1 


470.00 




490JX> 


■ 


I9O.00 


.. 


180.00 


i ; 




Promotion yncances : 
Pour lacnm a un module edits 
par Texas, II est offert un 
programme Collins au cholx 
Introduction au Tl 99/4 ft) 
Introduction au Tl 99/4 (2) 
Les techniques des 
programmes de Jeux (7) 
Les techniques des 
programmes de Jeux (2 J 
le basic par sol-mSme. 



TO7-70 MoS 



BON DE COMMANDE 

TARIFSAOUT 1984 



vme 

Ces pfix ionl indkjtfts et pruvent r~tre IJMUlWl wjts 
rxevtvfj. 

Produits dtiportiblts item il limttr tie nM itockt en 

mjg,vin 

Participation ,iux Uah de port et d'eiptdition en ie 

command^ pour les logic fell : + 30 F. 

IA RtGLF. A CALCUL 

65/67. M S.iirit-C,rrnuiri. S:<X>5 PARIS 

Tti 3256888 ■ Tttet FtRAV J20064ffli03 KAC 

Llvralion des produits dliponlbles sous jours. 



